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Memory — you never seem to have quite 
enough of it. 

But if you're one of the thousands of Apple 
owners using the SoftCard, there's an economical 
new way to expand your memory dramatically. 

16K ON A PLUG-IN CARD. 

Microsoft's new RAMCard simply "" 
plugs into your Apple II,* and adds 16k 
bytes of dependable, buffered 
read/write storage. 

Together with the SoftCard, 
the RAMCard gives you a 56k 
CP/M " system that's big enough ! 
to take on ail kinds of chores that 
would never fit before (until now, 
the only way to get this much ' 

memory was to have an Apple 
Language Card installed). 

GREAT SOFTWARE: ^ 

YOURS, OURS, OR THEIRS. 

With the RAMCard and 7l 

SoftCard, you can tackle large- 
scale business and scientific a 
computing with our COBOL and III 
FORTRAN languages. Or greatly t 
increase the capability of CP/M 
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applications like the Peachtree Software account- 
ing systems. VisiCalc™ and other Apple software 
packages can take advantage of RAMCard too. 

And RAMCard gives you the extra capacity to 
develop advanced programs of your own, using the 
SoftCard and CP/M. Even with the RAMCard in 
place, you can still access your ROM BASIC 
and monitor routines. 



JOIN THE SOFTCARD 
FAMILY. 

The RAMCard is just the 
latest addition to the SoftCard 
family — a comprehensive sys- 
tem of hardware and software 
that can make your Apple more 
versatile and powerful than you 
ever imagined. 

Your Microsoft dealer has all 
the exciting details. Visit him 
: soon, and discover a great idea 
that keeps getting better. 

Microsoft Consumer Products 
10700 Northup Way 
Beilevue, WA 98004 
z . 206-828-8080 
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2MHZ 6809 SYSTEMS 

GIMIX offers you a variety to choose from! 

38 MB WINCHESTER SYSTEM $17,498.99 

HARDWARE FEATURES: 

• 2MHz 6809 CPU * 

• 512KB Static RAM * 

• 8 RS232C Serial Ports • 

• 2 Parallel Ports 
SOFTWARE FEATURES: 

• OS-9 LEVEL TWO Multi-User • 
Operating System * 



DMA Double Density Floppy Disk Controller 
Dual 8" DSDD Floppy Disk System 
Dual Winchester Subsystem with 
Two19 MB 5Va" Winchester Drives 

OS-9 Text Editor 
OS-9 Assembler 



• OS-9 Debugger 



19 MB WINCHESTER SYSTEM $8998.09 



HARDWARE FEATURES: 

• 128K Static Ram * 

• 2MHz 6809 CPU • 

• 19 MB 5 1 / 4 " Winchester DMA Subsystem • 
SOFTWARE FEATURES: 

• OS-9 LEVEL TWO Multi-User • 
Operating System * 



4 RS232C Serial Ports 

1 MB 5 1 /»" Floppy Disk Drive 

DMA Double Density Floppy Disk Controller 

OS-9 Debugger 
OS-9 Assembler 



• OS-9 Text Editor 

128KB MULTI-USER SYSTEM $6997.39 

HARDWARE FEATURES: 

• 2MHz 6809 CPU • 2 RS232C Serial Ports 

• DMA Double Density Floppy Disk Controller • Dual 8" DSDD Floppy Disk System 

• 128KB Static Ram 

SOFTWARE FEATURES: Your choice of either UniFLEX or OS-9 LEVEL TWO. Both are Unix-like 
Multi-User/ Mufti-Tasking Operating Systems. 

56KB FLEX/OS-9 "SWITCHING" SYSTEM $4148.49 

HARDWARE FEATURES: 

• 2MHz 6809 CPU • DMA Double Density Floppy Disk Controller 

• 56K Static Ram * 2 Built-in 5Va" 40tr DSDD Disk Drives 

• 2 RS232C Serial Ports (80 Track DSDD Drive Option . . add $400.00) 
SOFTWARE FEATURES: 

• GMXBUG monitor — FLEX Disk Operating System 

• OS-9 LEVEL ONE Multi-tasking operating system for up to 56K of memory 

WINCHESTER SUBSYSTEMS 

Winchester packages are available for upgrading current GIMIX 6809 systems equipped with DMA controllers, at least one 
floppy disk drive, and running FLEX, OS-9 LEVEL ONE or OS-9 LEVEL TWO. The packages include one or two 19MB (unformat- 
ted) Winchester drives, DMA Hard Disk Interface, and the appropriate software drivers. The Interface can handle two 5Vi" 
Winchester Drives, providing Automatic Data Error Detection and Correction: up to 22 bit burst error detection and 11 bit burst 
error correction. 

Dual drives can be used together to provide over 30 MBytes of on line storage ~ or use one for back-up of the other. (More 
convenient and reliable than tape backup systems. 

#90 includes one 19MB Drive, Interface, and Software $4288.90 

#91 includes two 19MB Drives, Interface, and Software $6688.91 

Contact GIMIX for systems customized to your needs or for more information. 
50 HZ Export Versions Available 

GIMIX Inc. reserves the right to change pricing and product 

specifications at any time without further notice. 1 337 WEST 37th PLACE 

CHICAGO, ILLINOIS 60609 

GIMIX® and GHOST® are registered trademarks of GIMIX Inc. /T1 9 1 ! Q97 c^m 

FLEX and UniFLEX are trademarks of Technical Systems Consultants Inc. * ' 

OS-9 is a trademark of Microware Inc. TWX 910-221-4055 1982 GIMIX Inc. 
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THE CHIEFTAIN 5 4-INCH WINCHESTER 

HARD DISK COMPUTER 





SO ADVANCED IN SO MANY WAYS . . . 

AND SO COST-EFFECTIVE . . . 

IT OBSOLETES MOST OTHER SYSTEMS 

AVAILABLE TODAY AT ANY PRICE. 



• HARD DISK SYSTEM CAPACITY 

The Chieftain series includes 5'A- and 8-inch 
Winchesters that range from 4- to 60- 
rnegabyte capacity, and higher as technology 
advances. All hard disk Chieftains include 
64-k memory with two serial ports and 
DOS69D disk operating system. 

• LIGHTNING ACCESS TIME 

Average access time for 5'/4-inch Winchesters 
is 70-msec, comparable to far more costly 
hard disk systems. That means data transfer 
ten-times faster than floppy disk systems. 



The Chieftain 
Computer Systems: 



Here are the Chieftain 6809-based 
hard disk computers that are destined 
to change data processing ... 



• 2-NHZ OPERATION 

Ail Chieftains operate at 2-MHz, regardless 
of disk storage type or operating system 
used. Compare this to other hard disk 
systems, no matter how much they cost! 

• DNA DATA TRANSFER 

DMA data transfer toand-fvom tape and dM\ 
is provided for optimum speed. A special 
design technique eliminates the necessity 
of halting the processor to wait for data 
wtiii h normally transfers at a slower speed, 
determined by the rotational velocity of 
the disk. 

• RUNS UNDER DOS OR OS-9 

no matter which Chieftain you select . . . 
5'A- or 8-inch floppy, or 5'A- or 8-inch 



Winchester with tape or floppy back-up ... 
they all run under DOS or OS-9 with 
no need to modify hardware or software. 

• UNBOUNDED FLEXIBILITY 

You'll probably never use it, but any Chieftain 
hard disk system can drive up to 20 other 
Winchesters, and four tape drives, with a 
single DMA interface board! 

• SMOKE SIGNAL'S HERITAGE OF 
EXCELLENCE 

This new-generation computer is accompa- 
nied by the same Endurance-Certified 
quality Dealers and end-users all over the 
world have come to expect from Smoke 
Signal. And support, software selection and 
extremely competitive pricing are very much 
a part of that enviable reputation. 



20-Megabyte Tape Streamer Back-Up Option 
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CHIEFTAIN 95W4 

4-megabyte, 5'A-inch Winchester with. 
a 360-K floppy disk drive (pictured), 

CHIEFTAIN 95XW4 

4-megabyte,, 5'4-inch Winchester with 
a 75f>k octo-density floppy disk drive 

CHIEFTAIN 98W15 

15-megabyte, Spinet Winchester with 
a f-megabyte 8-inch floppy disk drive. 

CHIEFTAIN 9W15T20 

15-megabyte, 5Vi-inch Winchester with 
a 20-megabyte tape streamer. 



Available with all Chieftain hard 
disk configurations. This 
cartridge tape capability 
provides full 20-megabyte 
disk back-up in less than five 
minutes with just one 
command, or copy com- 
mand for individual file 
transfers. Transfers data 
tape-to- disk or disk-to- 
tape. Floppy back-up is 
also available in a variety 
of configurations. 





Write or call today for details (including the low prices) 
on the Chieftain Series. . . and on dealership opportunities 
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® 



31336 VIA COLINAS 
WESTLAKE VILLAGE, CA 91362 
TEL (213) 889-9340 
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68000 Feature 

Once again the microcomputer industry has a new and ex- 
citing product to offer users: the 68000 microprocessor. 
Dozens of companies have already built computers around 
this chip, or developed compatible software and peri- 
pherals. The big news about the 68000 is that it can be 
used as a powerful add-on to your 6502. 

Laurence Kepple, in "The 68000 and the Personal 
Computer" (p. 27), discusses the 68000 as a 6502 add-on. 
He offers some insights on the manufacturers and their 
products. If you're interested in adding a 68000 to your 
present system, take a look at this article. 

We're providing a very useful and detailed series on the 
68000 microprocessor itself, authored by Joe Hootman, a 
Professor of Electrical Engineering at the University of 
North Dakota. The first part (p. 41) contains a brief in- 
troduction to the 68000 and detailed treatment of the data 
movement commands. Future installments will offer 
tables on the 68000's instruction set. 

Tom Whiteside and Joe Jelemensky of Motorola, manu- 
facturer of the 68000, describe the registers, instruction 
set, and addressing modes of this microprocessor [p. 32). 

Our data sheet this month will serve as a handy refer- 
ence to 68000 programmers. 



We welcome Dr. Richard C. Vile, Jr., as an Apple con- 
tributing editor. Richard will be working with our in- 
house Apple specialist, Phil Daley, to expand our Apple 
coverage. 

Commodore 

There are two articles of special interest to PET/CBM 
owners. Peter Hiscocks (p. 11) describes a hardware tech- 
nique to simultaneously display on the PET's screen the 
computer's output and the image from a closed-circuit TV 
camera. Although the PET does not have access to the im- 
age, it can be programmed to display fancy captions or to 
point out certain features. The picture could also be used 
to enhance an otherwise dull computer run. 

"Auto SAVE for the PET" by Louis Sander (p. 83) is a 
BASIC subroutine you attach to your programs during 
development. It ensures that you make copies of your pro- 
gram at regular intervals, thereby giving you more protec- 
tion from unanticipated disasters. 

Loren Wright's "PET Vet" column (p. 78) discusses 
Eastern House Software's MAE macro assembler and some 
new Commodore-oriented publications. 

We would like to welcome Dave Malmberg and Jim 
Strasma as contributing editors in the Commodore area. 

Atari 



6809 

Hal Clark presents an article (p. 57) for 6809-based 
machines to give a Pascal-like structure to your machine- 
language programs. This makes the program easier to read 
and debug while maintaining the execution speed and 
memory efficiency of assembly language. 

A BASIC program to calculate market projections on 
industry and company sales, by Len Suckle, is presented 
for the Color Computer (p. 67). It could be translated to 
other BASICs fairly easily and is well documented so you 
could customize for a specific application. 



Apple 

For Apple users, Barton Bauers has written an extremely 
useful machine-language utility to reduce the length of 
Applesoft BASIC programs and increase the speed of 
loading and execution (p. 89). It allows you to fully docu- 
ment your program with remarks and single line state- 
ments for legibility, and then remove the remarks and con- 
catenate all non-referenced lines for a streamlined version. 

This month's "Apple Slices" column (p. 47) by Tim 
Osbom, presents a quick random-access technique called 
' 'hashing." If you want to speed up access to your file pro- 
grams that do a lot of random accessing, here is the solution. 



We are happy to have Paul Swanson on board now as a 
contributing editor and Atari columnist. Paul's column 
will begin in November. He will also help us increase our 
base of Atari authors. 

Straightforward Garbage Collection 

This program by Comelis Bongers appeared in our August 
issue, page 90 (also one of the utilities on disk). A few 
readers missed the important note that appeared at the end 
of Mr. Bongers' article. Here it is again, in case you missed 
it too: 

The machine-language program starts at $9000 and has 
a length of $260 bytes. After assembling the text file and 
storing it to disk, the program can be installed by : BRUN 
programname. This command executes an initialization 
routine that sets HIMEM to $9000 and installs the & vec- 
tor. If you want to BRUN the routine from within an Apple- 
soft program, the BRUN command should be inserted at 
the first line of the program, and must be followed by a 
CLEAR command. For example: 

10 PRINT "BRUN program name": CLEAR: REM control D 
behind first quotes. 

The program makes use of some Applesoft routines in 
ROM. If the RAM version of Applesoft is being used, the 
relevant subroutine calls have to be adjusted. JMQ>Q" 
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The 68000 and the Personal Computer Laurence Keppie 

The 68000 as an add-on to 6502-based systems 

An MC68000 Overview Tom Whiteside and Joe Jelemensky 

A description of the 68000's registers, instruction set, and addressing modes 

68000 Instruction Set Joe Hootman 

Part I in a series on the 68000, including a detailed table of Data Movements 



HARDWARE 

-j -j Superimposing TV Pictures on PET Video Peter d. wscocks 

' ' Modify the PET to superimpose a television camera picture on the PET video display 

1 A a/d Conversion Using a 555 Timer IC Mike Dougherty 

' ^ This simple 555 timer yields a high dynamic range inexpensively 

po Delayed Reset and Autoboot for the OSI Ugov.Re 

^-^ Add both a time delay to the BREAK key, and an automatic disk system bootup 

LANGUAGE AIDS 

C -J AMPER-POS for the APPLE Philippe Francois 

'-' ' A machine-language utility that extends APPLESOFT to include a POSition function 

C7 6809 Macros for Structured Programming Hal Clark 

^ ' Use assembler macros for structured assembly-language programming 



APPLICATIONS 
67 



Market Projection Program 

for the Color Computer Leonard I. Suckle 

A sophisticated business program to project industry and company sales 



Double-Entry Formatting for your Checkbook 

80 On the C1 P Leo Jankowski 

A simple checkbook balancing program 



UTILITIES 

oq Auto SAVE for the PET 

^^ A routine for automatic cassette backup 



. Louis F. Sander 



89 



COMPRESS — An APPLESOFT Optimizer Barton m. Bauers 

Reduce APPLESOFT program memory requirements by up to 30% 



COLUMNS 

A~7 Apple Slices 

^ ' "Hashing". ..A quick random-access technique 



7i 



PET Vet 

The MAE assembler and new Commodore-oriented publications 



. Tim Osborn 
Loren Wright 
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VIA Train Number 1, "The Canadian," 
makes its way westward across the con- 
tinental divide. Nearly three days ago it 
left Montreal and tomorrow morning it 
will be in Vancouver, British Columbia. 

Computers are used by travel agen- 
cies to keep transportation schedules, 
such as this one, readily accessible. A 
microcomputer could be installed on 
board the train and tied into a radio com- 
munications network with other, larger 
computers. The Canadian Pacific Rail- 
road (whose tracks VIA is using) runs 
long sulfur, coal, and grain trains with 
computer-controlled "robot" loco- 
motives midway through the train. 
Every change in speed or gear made by 
the crew at the head of the train is 
duplicated by the robot locomotives. 

Photo by Loren Wright, MICRO Editor 
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Editorial 



When Worlds Collide 

The 68000 microprocessor is one of a 
number of new chips that are making it 
increasingly difficult for minicomputer 
manufacturers to justify their existence 
as an enterprise distinct from the world 
of microcomputing. More than market 
share and terminology are at stake. The 
critical issue is: what role does the in- 
dividual user play as part of a computer 
system? In a microcomputer system, 
the computer and the user are on equal 
terms, one-on-one partners in a 
problem-solving endeavor. In a mini- 
computer, multiuser environment, the 
individual user is simply less impor- 
tant. Many users must compete for the 
attention of the CPU. Waiting in line 
has never been popular, and some peo- 
ple are asking why, in this era of ever 
cheaper hardware, there are those who 
say we should go on waiting. For exam- 
ple Hal Hardenbergh, in his newsletter 
DTACK Grounded, speaks up for the 
individual user with some vigor: "Re- 
fusing to give each user his or her own 
individual, undivided processor chip is 
prima-facie evidence of utter contempt 
for the customer. And utter contempt 
is all that a minicomputer type has for 
us personal computer types!" 

"Utter contempt"? Surely Mr. Har- 
denbergh goes too far. However, con- 
sider the following observation from 
Ms. Andrea Lewis in a recent issue of 
Computet Design: "Putting a mini- 
computer operating system on a toy 
computer will not result in a cheap 
minicomputer." By "toy computer," 
Ms. Lewis means to indicate "micro- 
computer." She goes on, "To support 
multiple users in a true timesharing en- 
vironment, reliable memory protection 
must be provided to keep one errant 
user from disrupting the other users' 
work on the system." A "true time- 
sharing environment"? Is there 
something intrinsically valuable about 
timesharing? Useful when hardware 
was fabulously expensive, timesharing 
still requires costly overhead, such as 
the "reliable memory protection" to 
which Ms. Lewis refers. 

Other costs of timesharing are more 
subtle. For example, VisiCalc, a pro- 
gram that was conceived especially for 
"toy computers," does not work well 
in a timesharing environment. As 



Tracy Licklider, Vice President of Soft- 
ware Arts, noted recently, "VisiCalc is 
a screen-intensive, highly interactive 
program. Timesharing systems simply 
cannot process VisiCalc's frequent 
demands for screen refreshes. In a 
minicomputer, multiuser environ- 
ment, VisiCalc gets bogged down." 
Thus, one of the most powerful pro- 
grams in history succeeded in part 
because its designers were thinking in 
terms of a one-on-one relationship be- 
tween the computer and its user. 

Interactivity is the key, because in- 
teractivity means maximum user in- 
volvement. What minicomputer manu- 
facturers have yet to understand is that 
the more involvement users have in a 
computer system, the more powerful the 
computer system becomes. As Hal Har- 
denbergh puts it: "To a minicomputer 
type, a minicomputer which has seven- 
teen applications programs available 
for it is described as 'heavily 
supported.' You tell the owner of a 
PET, Apple, or [TRS] 80 that a par- 
ticular personal computer has a thou- 
sand application programs available 
and they will reply, 'Oh? What's wrong 
with it? Isn't it a popular machine?' " 
The fantastic support available for a 
micro like the Apple is a direct result of 
user involvement. 

Even those with a minicomputer or- 
ientation are beginning to think in 
terms of "one person, one processor." 
Computet Business News recently 
quoted Motorola Inc.'s Tom Starnes as 
saying that, though everyone does not 
need distributed processing capabilities 
in their applications now, almost 
everyone will "run out of gas" in terms 
of processing capability using a single 
system bus. "Which is why applica- 
tions are turning more frequently to 
distributed processing where a number 
of different processors each performs 
their own isolated programs," he con- 
tended. As for timesharing systems, 
Stames said, "It is not much more ex- 
pensive to have a [16-bit chip] and 
memory for user programs in the work- 
station itself. The benefit is the user 
has a high-performance processor all to 
himself." To which we at MICRO say, 
"Amen." / 
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Letters/Updates 



Atari DOS Bug 

Dear Editor: 

There is a bug in the Atari DOS (or 
BASIC'S disk I/O) that can clobber up 
to half of RAM page 6, the "safe" ram. 
Since the operation of this bug isn't ob- 
vious, it can cause incredible amounts 
of trouble; I spent two days going over a 
USR subroutine to try to find the bug, 
before I discovered that my routine had 
nothing to do with it. 

A bug in either DOS (DOS I, DOS 
2.0's, and OS/A tested), the BASIC car- 
tridge, or the 10K OS ROM (Version A 
tested), causes the location of the 
disks' I/O buffer to move from around 
location 7000-8000 (decimal) to loca- 
tion 1408, which is only 128 bytes 
below location 1536, the beginning of 
page six. 

This means that an input or output 
of more than 128 bytes will destroy 
some or all of the first 127 bytes of page 
six! 

David H. Simmons 

P.O. Box 7000-140 

Redondo Beach, CA 90277 



Othello Update 

Phil Daley, MICRO'S Technical 
Ectitoi foz the Apple, offers this update: 

In the program Othello [MICRO on 
the Apple, Vol. 3), Charles Taylor 
presents a two-person game with the 
computer keeping track of the board 
position and legality of moves. With 
the minor modifications presented 
here, the computer will play a level 1 
game of Othello for those who need an 
opponent. This would be especially use- 
ful in learning how to play the game. 

Lines 16-135 contain adjustments 
to the Taylor program corresponding 
lines. Lines 173-183 are new material. 
There was a minor bug in the program 
as published. The only way the pro- 
gram knew that the game ended was 
when all 64 blocks were filled. It is 
possible to not have any moves left 



Atari Bug Demo 



TESTING INSTRUCTIONS: 

As Type in program. 

B: SAVE to disk as "D: BUGTEST. BAS" . 

C: Type "RUN". 

01OO REM : BUG-DEMO 
0110 REM : BY DAVID H. SIMMONS 
0120 DIM IN* (256) 

0130 OPEN #1,4,0, "D: BUGTEST. BAS" 
0140 REM (OR OTHER 'TEXT RECORD' FILE) 

0150 ? "IOCB BUFFER ADDRESS: "; PEEK (852) +256*PEEK (853) 
0160 REM : *(IOCB #1 ICBAL/ICBAH) * 
0170 INPUT #1; IN*: INPUT #1;IN* 

0180 ? "AFTER INPUT: "; PEEK (852) +256*PEEK (853) 

0190 ? " +128= 1536, START OF PAGE SIX!":? "I/O Of more than 
128 bytes WIPES OUT anything in page six!" 
0200 CLOSE #1:END 



when there are still unfilled spaces. 
Line 135 allows a player to enter 
"DONE" when this condition occurs 
and thereby end the game. 

If you wish to design a level 2 game, 
a subroutine to examine how many 
"captures" could occur on each possi- 
ble move would improve the 
computer's chances. 



Fan Improvement 

Dear Editor: 

I recently purchased a System Saver 
fan by Kensington Software. Although 
the fan works as advertised, I have 



made two improvements that 
readers might be interested in. 



your 



First I covered the vent slots on the 
right side of my Apple with a section of 
air-conditioning filter. This prevents 
dust from being drawn across the inside 
of the computer. The filter was attached 
with duct tape to the outside of the 
computer. 

The second improvement was to 
place 1/8-inch thick foam rubber be- 
tween the part of the fan case and com- 
puter that come in contact with each 
other. This minimizes vibration. 

Robert Gershowitz 

76-51 169 Street 

Flushing, NY 11366 



Listing lor Othello Line Changes 



16 
34 



DIM B0ARD(9,9) : 
FOR I = 1 TO 8: 



DIM 00MPOTESM0VE$(61) 
REM) DY(I): NEXT I: FOR I 



1 TO 61: REM) ODS(I): NEXT 



56 TURN - 2: GOSUB 181 

60 O0LOR= OC(TOBN) :ZZ = 

IF NOT Z OR TORN = 1 THEM PRINT PFOMPTS(TURN) 

IF Z AND TORN = 2 THEN ZZ = ZZ + 1:M3VE$ = COS(ZZ) 
SUBR GKTMOVE 
PASS = 0: IF HMBS = "DONE" THEN PASS - 1:Q - 100: RETURN 

DATA A1,A8,H1,H8,B1,B8,G1,G8 

DATA A2,A7,H2,H7,C1,C8,F1,F8 

DATA A3,A6,H3,H6,D1,D8,E1,E8 

DATA M,A5,H4,H5,C4,CS,F4,F5 

DATA D3,D6,E3,E6,C3,C6,F3,F6 

DATA D2,D7,E2,E7,B4,B5,G4,G5 

DATA B3,B6,C2,C7,F2,F7,G3,G6 

DATA B2,B7,G2,G7,P 

HOME : PRINT "DO TOU WISH TO PLAY THE COMPUTER?" 

INPUT Z$: IF LEFTS (Z$,l) = "Y" THEN Z = 1 

RETURN 



62 
133 

135 
173 
174 
175 
176 
177 
178 
179 
180 
181 
182 
183 



GOTO 135: REM 
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j Subscribe Now and Save 33 /o 

(Off Newsstand Price) 

(First Time Subscribers Only) 

MICRO brings you information-packed pages every month. 
Each issue delivered to your door opens doors to computing mastery! 

SUbSCriD6 10 MICRO and learn how to extend your computing 
knowledge to get the most out of your computer and expand its capabilities. 

SUDSCriDG 10 MICRO and develop your microcomputing skill. 
Keep up with the latest technology— Don't be left behind! 

Subscribe tO MICRO Today and find, each month at your 
door, a world of computing power you could only dream of yesterday. 
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Get The Most Out Of Your APPLE 



With The Most Important Book 
Ever Published on the APPLE! 

What's Where in the APPLE.. 

Plus...the All New Guide 

to What's Where 

Revised Edition of the famous Apple Atlas 




• Guides you — with a numerical 
Atlas and an alphabetical Gazet- 
teer — to over 2,000 memory loca- 
tions of PEEKs, POKEs, and 
CALLS. 

• Gives names and locations of 
various Monitor, DOS, Integer 
BASIC, and Applesoft routines — 
and tells you how they're used. 

• Enables you to move easily 
between BASIC and Machine 
Language 

• Guides you through the inner 
workings and hidden mechanisms 
of the Apple. 



All Apple users will find this book helpful in 
understanding their machine, and essential for mastering it! 

The Atlas and THE ALL NEW GUIDE are 

available in one, 256-page Wire-O-Bound 
book for only $24.95 

If you own the original What's Where in the 
Apple? you will want THE GUIDE to comple- 
ment your edition. This 128-page Wire-O-Bound 
version contains all new material to be used 
with the memory map and atlas for $9.95. 



With 

MICRO on the 
APPLE Series 

Complete with 
Diskette 

No need to type in 
hundreds of lines of code. 



«i^^ 




Vol.1 

Allows you to: 
I Round and format 
numbers accurately 
I Get lowercase 
letters and punctua- 
tion into Applesoft 
strings 
I Ray the hig game 
"Spelunker" 



Vol.2 

Lets you: 

■ Speed up machine 
language programm- 
ing using 5 powerful 
machine language 
aids 

■ Add additional 
editing and I/O 
features 

■ Play the intriguing 
game "GalactiCube" 



Vol. 3. 

Just Released! 

Gives you more: 
■ Machine language 

aids 

I I/O enhancements 
■Graphics and 

games 



...and much, much more! 

Together Volumes 1, 2, and 3 provide 
more than 110 programs on diskette 
for less than $1.00 each. 
Volumes 1 and 2: 13 sector DOS 3.2 format. 
Volume 3: 16 sector DOS 3.3 format. 

Micro on the Apple, Volumes 1, 2, and 3 
(Complete with Diskette) 

$24.95 each 



NO POSTAGE 

NECESSARY 

IF MAILED 

IN THE 

UNITED STATES 



BUSINESS REPLY CARD 

FIRST CLASS PERMIT NO. 60, CHELMSFORD, MA 



POSTAGE WILL BE PAID BY ADDRESSEE 

MICRO 

34 Chelmsford Street 
P.O. Box 6502 
Chelmsford, MA 01824 



Use Coupon 
On Reverse 

Side to Order 
and 

Mail TODAY! 



83-356 



ROCKWELL Microcomputers from Excert, Inc. 



THE AIM 65/40 
Single Board or Smorgasbord 



THE AIM 65 
Take-Out Order 



'3g» 
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• A full size terminal style keyboard w/8 special 
function keys 

• A smart, 40 character display with its own 
microprocessor 

• A 40 column printer w/text and graphic output 

• Up to 64K of on-board RAM and ROM 

• On-board interfaces include RS232, dual audio 
cassette and 2 user I/O R6522 devices 

• Firmware includes interactive monitor and text 
editor w/options of Assembler, BASIC, FORTH 
and PL/65 



• A full size terminal style keyboard w/3 special 
function keys 

• A 20 character display 

• A 20 column printer w/text and graphic output 
capability 

• Up to 4K RAM and 20K ROM on-board 

• On-board interfaces include 20MA TTY, dual 
audio cassette and 1 user I/O R6522 device 

• Firmware includes interactive monitor and text 
editor w/options of Assembler, BASIC, FORTH, 
PASCAL, & PL/65 



And if the above isn't enough, 
Try the RM65 — a product line filled with embellishments including: 



32K DRAM Board 
CRT Controller 
Floppy Disk Controller 
PROM Programmer 



AC I A Board 
IEEE-488Board 
CPU/SBC Board 
4-1 6 Slot Card Cages 



Prototype cards 
Adaptor Buffer Modules 
General Purpose I/O Board 
PROM/ROM Board 



NEW LOWER PRICES AND A CASH DISCOUNT* TO BOOT! 



A65/40-16(16KRAM) $1225. 

A65/40-32 (32K RAM) $1295 

A65/40-A (Assembler) $ 85 

A65/40-B (BASIC) $ 65 



Mail Order to: 

Educational Computer Division 
EXCERT INCORPORATED 



A65-1 (1 K RAM) $420 

A65-4 (4K RAM) $445 

A65-4B(4KRAMw/BASIC) $495 

A65-PS (PASCAL) $100 

A65-F (FORTH) $ 65 

A65-A (Assembler) $ 35 



SALES 
SERVICE 
INSTALLATION 
CONSULTING 



P.O Box 8600 

White Bear Lake, MN 55110 

(612)426-4114 



Higher quantities quoted upon request, COD's accepted, 
shipping will be added. * Deduct 5% cash discount on 
prepaid orders. Minnesota residents add 5% sales tax. 
Prices subject to change without notice. 
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Skyles Electric Works 




Epson-PET/CBM Graphic ROM Pack 

For PET/CBM Owners Who Want: 

Complete Program Listing Printouts 
Complete Screen Graphic Printouts 
Graphic Printouts From Programs 

on your Epson Printer 

Order the Skyles Electric Works EPSON-PET GRAPHIC ROM Package. The ROM when installed in an EPSON MX80, MX80FT, 
or MX100 with Graftrax Plus printer will reproduce most of the PET/CBM graphics characters. Most importantly 
when using the accompanying high speed machine language program, the Epson-PET Graphic ROM pack gives s 
complete program listing with all screen controls shown (cursor, home, clear, etc.). This high speed machine 
language program for program listing, screen image printout (screen dumps) and BASIC program controllec 
printing (i.e. PRINT ) automatically translates the PET-ASCII characters to the EPSON-GRAPHIC ROM characters. A 
BASIC sample program and PRINT subroutine, that may be incorporated into any existing BASIC program, completes 
this "complete solution" package. 

EPSON MODEL ROM MODEL 

MX70 Not Available 

MX80 (serial no. to 359999) EPG80 (EPG82, 3 ROM Version) 

MX80 (serial no. after 360000) EPG81 (EPG83, 3 ROM Version) 

MX80FT EPG8F 

MX80 Graftrax Not Available 

MX80 Graftrax Plus EPG8G+ 

MX80FT Graftrax Plus EPG8G+ 

MX100 Not Available 

MX100 Graftrax Plus EPG1DG+ 

The Epson-PET Graphics ROM Pack has been designed to furnish you with PET/CBM graphics printing in the easiest 
way possible. This is done by furnishing a high speed machine language program that is "hidden" at the top of 
your PET/CBM memory. 

The machine language program serves 3 major functions. 

1: Translates PET-ASCII code to ASCII code for program listing. 

2: Translates screen code to ASCII code for screen image printouts. 

3: Translates PET-ASCII code strings to ASCII strings for normal program printout. This feature may also be 
used for making ASCII files for your disk or tape recorder. 

INSTALLATION: Installs into your Epson printer 

PRICE: Epson-PET Graphics ROM Pack EPG80, EPG81, EPG8F $75.00 

Please specify your Epson printer model type and and serial number when ordering. 
For all PET/CBM's BASIC 2.0/Revision 3, or BASIC 4.0 

AVAILABILITY: Immediately from your LOCAL DEALER 

or 

VISA, MASTERCHARGE ORDERS CALL (800) 227-9998 (except California residents) 
CALIFORNIA ORDERS PLEASE CALL (415) 965-1735 



Skylcs Electric Works 



23 IE South Whisman Road 
Mountain View, CA 94041 
(415) 965-1735 
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Superimposing TV Pictures 
on PET Video 



by Peter D. Hiscocks 



The Commodore PET may be 
modified to superimpose the 
picture from a television camera 
on the PET video display. The 
resultant combined picture (PET 
video and television Image) may 
also be fed to a remote monitor 
or video tape recorder. 



I had to superimpose the picture from a 
television camera on the PET video 
display as part of an airborne camera 
control unit (see reference). The same 
concept could be useful in a variety of 
situations. For example, the composite 
video signal — television picture plus 
PET graphics and alphanumerics — 
could be fed to an extension monitor or 
video tape recorder and the PET would 
become a very sophisticated video titling 
system. In another situation, the signal 
from a microscope-mounted television 
camera could be fed to the PET and the 
area of cells determined by tracing with 
a light pen. 

Note that the television picture is 
not available to the PET; it is simply 
overlaid on the display, and the PET 
doesn't know of its existence. A block 
diagram of the system is shown in 
figure 1. 

A first requirement of the system is 
that the television camera scan rate be 
synchronized to that of the PET 
display. Fortunately, the vertical and 
horizontal sync signals are available at 
the PET User Port. These are modified 
to a suitable form by the sync circuits 
shown in figure 2, and fed to the televi- 
sion camera. The television camera 
must be able to accept and lock on 
these signals, but this is a common re- 
quirement of cameras that are used in 
studio situations. I used the Sanyo 
1620 X camera. 

The next requirement of the system 
is that the display be able to show a 
continuous grey scale from full dark to 



full brightness (or greenness, in the 
case of the new PETs). The PET dis- 
play, of course, only has to deal with 
the two extremes of brightness. The 
grey scale is dealt with by the video 
amplifier (figure 4) and the modifica- 
tions to the PET video display (figure 3). 

In the existing PET display cir- 
cuitry, the video amplifier switches the 
cathode of the CRT between 35 volts 
(dark level) and ground (white level). 



The added video amplifier controls the 
power supply rail of the existing 
amplifier, thereby setting the max- 
imum dark level and creating a con- 
tinuous grey scale in response to the 
video signal. PET characters (white) are 
visible as long as the video picture is 
not completely white. 

Modifying the PET video display is 
not for the faint-hearted or the novice 
electronic tinkerer. There are high 



Figure 1: Block Diagram 
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Figure 2: Sync Circuits 
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Figure 3: PET Video Amplifier Modifications 
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Figure 4: Camera Video Amplifier 
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Figure 5: Video Ampllfer 
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voltages inside the display, and ; 
mistake could fry you and/or you 
PET. The circuit details that I show ii 
figure 3 apply to the early PETs am 
you'd be wise to confirm the circuitry i 
you have a newer version. 

The circuitry of the added video am 
plifier should be copied fairly closely 
especially in the choice of transistor: 
(the bandwidth requirement for th< 
amplifier is in the order of 3.5 MHz). 
made up the circuit on Veroboard anc 
mounted it inside the case of the PET 
display. In my installation, I used ; 
relay to kill the television picture sc 
the toggle switch could be placed or 
the front panel, without having to rur 
signal-carrying leads up to the fron 
panel. Leads from the added videc 
amplifier to the existing videc 
amplifier should be kept as short a; 
possible and well away from the 
display flyback transformer area. 

In figure 3, the addition of the 4.7 
Kohm resistor prevents excessive 
power dissipation in the 33-volt zenei 
diode. 

Figure 1 also shows how the com 
bined picture and graphics image ma) 
be sent to some external device such a; 
an external video display or video tape 
recorder. The video amplifier of figure 5 
buffers the video signal from the televi- 
sion camera and the HUH Video Buff ei 
(HUH Electronics, 1429 San Mateo, 
CA 94402) develops a composite sync 
signal from the PET sync signals. Ax 
alternative suitable circuit for the lattei 
is given in The PET Revealed, by Nick 
Hampshire, page 86. 

Reference 

"A Computer-Based Camera Con- 
trol System," by A. Roberts and P. 
Hiscocks, Photogrammetric Engineer- 
ing and Remote Sensing, Vol. 47, No. 
1, Jan. 1981, pp. 53-57. 



Peter Hiscocks is an instructor at Ryerson 
Polytechnical Institute, where he teaches 
courses in Electrical and Theatre 
technology. He is a columnist far Audio/ 
Video Canada, builds computer interfaces 
on a freelance basis, and is currently 
working on a computer-controlled sound 
system for the reproduction of insect 
sounds at the Royal Ontario Museum. He 
may be contacted at Electrical Dept., 
Ryerson Polytechnical Institute, 50 Gould 
St., Toronto, Canada M5B 1E8. 
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fromSubLOGIC... 
quality software 
for your Apple II. 




OIL P 879 oil_~T~M2 R 



A2-FS1 

FLIGHT SIMULATOR 

Combines superior flight simulation with the best 
animated 3D graphics available. Practice take-offs and 
landing, other aerial maneuvers, declare war on the 
enemy. 16K cassette, $25.00. 32K disk, $33.50. 



A2-PB1 

PINBALL -The ultimate arcade simulation 
program, an exciting pinball game with the ball and 
flipper precision to make increased skill pay off. 
Includes 10 different play modes and 100 user- 
adjustable modes. 48K disk, $29.95. 
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A2-SG1 



i -The simple game of captive 

pursuit. A gem for game purists ... A classic for your 
game collection. 48K disk, $29.95. 



See them today 
at your dealer . . . 



or for direct orders add $1.50 and specify UPS or first class 
mail. Illinois residents add 5% sales tax. VISA and 
MasterCard accepted. Descriptive brochures of most 
products listed here are available on request 

"Apple" is the registered trademark of Apple Computer Inc. 



LOGIC 

Communications Corp. 
713EdgebrookDrive 
Champaign, I L 61820 
(217) 359-8482 
Telex: 206995 



A/D Conversion 
Using a 555 Timer IC 



by Mike Dougherty 



For applications not requiring 
high-speed analog to digital 
conversion, this simple 555 
Timer circuit yields a high 
dynamic range for very low cost. 
Although demonstrated with an 
Atari 800, this 555 A7D converter 
may be used by any computer 
system with one unused bU on 
an input port. 



These programs require: 

Atari 800 

555 Timer IC 

and other electronic 

components 

The Atari 800 already contains hard- 
ware capable of digitizing a resistive 
sensor, such as a thermistor or photo- 
resistor, through a game controller 
jack. During each video scan, the 
resistance of each paddle is measured 
by a custom-designed LSI chip called 
POKEY. At the end of a video scan, the 
Atari Operating System reads the 
POKEY registers and places the digi- 
tized values in the paddle shadow 
registers in memory. These values are 
accessed through the PADDLE ( ) 
function of BASIC. 

Since the POKEY digitization is 
done by hardware and the shadow regis- 
ters are maintained by the operating 
system, this analog to digital conver- 
sion method is easy to use. Simply 
replace the paddle controller with the 
desired resistive sensor and obtain the 
digitized result via the proper PAD- 
DLE! ) function. The actual A/D con- 
version will be performed auto- 
matically by the hardware and updated 
by the operating system every l/60th 
of a second. 

As straightforward as this approach 
seems, there are two major disadvan- 
tages. First, the Atari 800 hardware was 
designed for the IMS potentiometer 
used in the paddle controller. To fully 
utilize the Atari hardware, the variable 



resistance to be measured should cover 
this range. Often it is difficult for the 
hobbyist to find a resistive sensor with 
this full range. Secondly, even if such a 
resistive sensor is found, the Atari 
hardware can only resolve one part in 
228. This yields an effective A/D con- 
version of LOG 2 (228J = 7.8 bits. There 
are many applications which could use 
finer resolution or greater dynamic 
range. 

This article discusses the use of an 
inexpensive 555 Timer circuit, the soft- 
ware required to digitize the 555 out- 
put, and software designed to display 
the 555 Timer waveform on the Atari 
800. Although the Atari 800 is used to 
demonstrate the 555 Timer circuit, the 
general principles may be applied to 
any 6502-based computer. 

Hardware 

The 555 Timer is available from 
Radio Shack in an eight-pin DIP 
package for approximately $1 (Radio 
Shack part number 276-1723). This ap- 
plication uses the 555 as a free-running 
astable multivibrator, shown in the cir- 
cuit of figure 1. In this mode of opera- 
tion, the 555 outputs a TTL-compatible 
pulse stream on pin 3. The waveform of 
the pulse stream is determined by the 
external resistors, Ri and R 2 , and the 



Figure 1: 555 Timer Circuit 
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capacitor, Ci. For each single pulse, pin 
3 remains at a low voltage for a time, 
t L , proportional to Ri . Pin 3 remains at 
a high voltage for a time, t H , propor- 
tional to R] + R 2 . Specifically, these 
times are defined: 

t H = 0.693 (R! + R 2 | (Ci) seconds 

t L = 0.693 (Ri) (Ci) seconds 

Thus, as the resistive sensor R 2 varies, 
the time that the pulse is high also 
varies. 

By attaching 555 pin 3 to an input 
pin on a parallel port, the length of time 
that the pulse is high may be measured 
by computer clock speed. In the astable 
mode, only a single input line is re- 
quired to digitize R 2 . 

The circuit of figure 1 was powered 
through the joystick #4 controller jack. 
Pin 7 of joystick #4 supplies the + 5 
volt source, while pin 8 is the Atari 
ground. With the Atari 800 providing 
the + 5V power source through the con- 
troller jack, a random variability up to 
10% was observed. This error was 
eliminated with the addition of a filter- 
ing capacitor, C 2 , across the + 5V 
source and ground. 

Software 

One simple approach to measuring 
the high portion of the pulse is outlined 
by the "pseudocode" in listing 1. 

The first two DOWHILE loops 
allow the pseudocode to synchronize 
with the free-running 555 pulse stream. 
In the worst case, this synchronization 
will take0.693(2Ri + R^fCi) seconds. 
Because of this relationship, R 2 was 
chosen as the resistive sensor and Ri 
was made as small as possible. Thus the 
time that a pulse is low is kept constant 
by R : and is only long enough for the 
first and third DOWHILE loops to recog- 
nize the zero level of the 555 output. 

The time represented by each count 
is determined by the length of the third 
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DOWHILE loop and the specific delay 
utilized. Typically, the exact length of 
the third DOWHILE loop is not impor- 
tant since most applications will re- 
quire a series of calibrations to map the 
digitized counts onto the physical 
quantity being measured. In practice, 
the third DOWHILE loop is written to 
execute as fast as possible. If this is not 
fast enough, then the value of capacitor 
Q is increased. By controlling both the 
measuring loop and the capacitor value 
of C 1( a wide range of resistive sensors 
may be utilized. 

As an example, the 6502 assembler 
subroutine in listing 2 demonstrates a 
19-cycle timing loop. With a 1 MHz 
clock, this loop will sample the input 
line, bit of PORT, every 19 micro- 
seconds. Assume that Ci is 0.1 jiF, Ri is 
fixed at 2KQ, and, the resistive sensor 
covers the range from 2KQ to 700KQ 
(the practical range of the paddle game 
controllers). Then t H will vary from 
0.2777 ms at 2KQ to 48.6 ms at 700KQ 
with the digitized count varying from 
COUNT =15 to COUNT = 2558, a 
range of 2543 counts. The worst case 
time to synchronize and take the sam- 
ple at the maximum resistance is 2t H + 
tL = 97.5 ms, or approximately l/10th 
of a second. 

If a longer delay may be tolerated, 
then Ci may be increased to lpiF. In this 
case, t H will vary from 2.77 ms to 486 
ms with the digitized count varying 
from 146 to 25579, a range of 25433 
counts. Thus the 0.1 /xF capacitor gives 
a digitized dynamic range of 
LOG 2 (2543) = 11.3 bits,- the 1.0 jjF 
capacitor gives a dynamic range of 
LOG 2 (25433| = 14.6 bits. If time is not 
a critical factor, the 555 approach 
allows high dynamic range for very low 
cost. 

Atari S00 Considerations 

The approach outlined in the 
previous sections may be implemented 
on the Atari after dealing with two 
operating system problems. Although 
these problems are specific to the Atari, 
other computer systems may have 
similar difficulties. 

The Atari computer system drives 
the video display through direct 
memory access (DMA|. A sophisticated 
approach utilizing the custom-designed 
LSI chips, called ANTIC and CTIA, 
provides the graphics versatility of the 
Atari. To optimize the video perfor- 
mance, the Atari has a basic clock 
speed of 1.79 MHz rather than the more 
common 1 MHz. However, the actual 
speed of program execution depends 



Listing 1: Pseudocode A/D Conversion 

BEGIN Pulse; 
initialize COUNT to zero; 
DOWHILE line is not equal to zero; 

read I/O port; 

logically "AND" with MASK to isolate 555 line; 
END WHILE; 
DOWHILE line is equal to zero; 

read I/O port; 

logically "AND" with MASK to isolate 555 line; 
ENDWHILE; 
DOWHILE line is not equal to zero; 

increment COUNT by one; 

delay; 

read I/O port; 

logically "AND" with mask to isolate 555 line,- 
ENDWHILE; 
END Pulse. 



Listing 2: Sample 6502 A/D Conversion Subroutine 
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BNE 
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EB 
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D00C 
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BNE 
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0615 


C8 


0180 




INY 




ADD CARRY TO MSB 


0616 


EA 


0190 




NOP 




DELAY FOR 1 CYCLES 


0617 


EA 


0500 




NOP 






0618 


AD01D3 


0510 




LDA 


PORT 


INPUT I/O PORT 


061B 


2901 


0520 




AND 


*toi 


ISOLATE BIT0 


061D 


D0F3 


0530 




BNE 


CNTLP 


STILL HIGH — COUNT ON 


061F 


F-00A 


0510 
0550 
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BEQ 


RETURN 


WRAP IT UP 
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EA 
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NOP 




DELAY FOR 5 CYCLES 


0622 


A5FF 
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D0E7 


0600 
0610 


t 
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062B 


8601 


0610 


RETURN 


STX 


COUNT 
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6 2D 
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STY 


COUNT+1 




62F" 


60 


0660 




RTS 






063 




0670 




.END 
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upon the amount of "cycle stealing" 
DMA activity required to run the video 
screen. As the graphics mode uses more 
memory to define the video screen, 
more DMA data transfers are required 
to refresh the screen. Thus a program 
will execute slower under GRAPHICS 8 
mode than under GRAPHICS mode. 
In addition, for graphics modes com- 
bined with text (e.g. GRAPHICS 8), the 
DMA rate will differ between display- 
ing the graphics portion and the text 
portion of the screen. This variable rate 
DMA affects the effective speed of the 
counting loop used to measure the 555 
pulse width. 

Fortunately, there is a simple solu- 
tion to the DMA problem — turn the 
DMA off. You can disable the DMA by 
writing a zero in the DMA shadow 
register, SDMCTL, located at $022F in 
memory. This value is transferred to 
the DMA controller register by the 
operating system during the VBLANK 
interrupt routine, every l/60th of a sec- 
ond. (VBLANK is the interrupt routine 
executed after every complete video 
scan. The Atari Operating System uses 
VBLANK to update the system time, 
input the game controller reigsters, 
transfer shadow registers to and from 
hardware, and other housekeeping 
tasks.) Thus to turn off the DMA, 
simply POKE a zero into memory loca- 
tion $022F and wait for the system 
clock to change (low order byte at 
$0014). Since VBLANK updates the 
clock, the change in the system clock 
value indicates that VBLANK has ex- 
ecuted and the DMA shadow register 
has been transferred to the DMA hard- 
ware. To restore the DMA, POKE a $22 
(decimal 34) to the DMA shadow 
register at memory location $022F. 

The second problem concerns the 
actual time taken to execute VBLANK. 
A typical 555 digitization time was 
about a tenth of a second or longer. 
During this digitization, VBLANK 
could interrupt several times. Since 
processor time would be spent ex- 
ecuting the VBLANK routine instead of 
counting, the digitized value would be 
too low. In addition, the short low 
period of the pulse could occur during 
VBLANK execution and be missed by 
the counting subroutine. The counting 
subroutine would erroneously continue 
until a low pulse was recognized. 

The Atari designers anticipated this 
type of problem also. Although the 
VBLANK interrupt is connected to the 
6502 non-maskable interrupt line, 
NMI, external hardware was provided 
to allow an Atari program to disable 
this NMI interrupt before it reaches the 
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Table 1: Atari 800 PORTB Pinouts 
PORTB 
Bit Joystick Pln# Mask 






#3 
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#3 
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#3 
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#3 
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#4 
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16 
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#4 
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32 
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#4 


3 


64 


7 


#4 


4 


128 



6502 chip. This interrupt line is con- 
trolled by bit 6 of the hardware register 
NMIEN at location $D40E. Clearing bit 
6 of NMIEN disables the VBLANK in- 
terrupt; setting bit 6 of NMIEN enables 
the VBLANK interrupt. A word of cau- 
tion: this register also controls other in- 
terrupts. To disable the VBLANK inter- 
rupt, POKE a $20 into NMIEN; to 
enable the VBLANK interrupt, POKE a 
$60 into NMIEN. 

A BASIC callable USR function to 
sample an input pin of PORTB, 
joystick #3 and #4, is given in listing 3. 
The USR argument is used to mask the 
8-bit I/O port to the single I/O line at- 
tached to the 555 pulse stream of pin 3. 
The pinouts for PORTB and associated 
masks are outlined in table 1 . 

TRACE 

To test the 555 circuit, a simple 
program was written to trace the 
PORTB input lines and store the results 
in memory to be later plotted on the 
screen. This program, TRACE, takes a 
trace of 1024 samples and plots the 
results in GRAPHICS 8 mode via the 
two USR functions in listings 4 and 5. 
TRACE also uses the USR function of 
listing 3 to allow the pulse stream to be 
digitized. The BASIC program is 
presented in listing 6. 

TRACE allows any input pin of 
PORTB to be sampled and plotted. The 
specific line is determined by the value 
of the bit mask variable, LINEMASK. 
Refer to table 1 for the PORTB pinouts 
and corresponding mask values. 

The loops used to perform the A/D 
conversion and to trace the waveform 
take 19 cycles. However, TRACE does 
contain one timing error. The trace 
function breaks the 1024 samples into 
four blocks of 256 single byte samples. 
This is because the 6502 indirect indexed 
addressing mode handles 256-byte 
blocks quickly and conveniently. The 
extra clock cycles between each 
256-byte block were preferred over 
slowing down the basic loop simply to 
sample all trace points at equal time 
intervals. 
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The plot of the trace is done by a 
USR function simply to make TRACE 
more convenient to use. The short 
marks displayed to the left of each 
256-byte trace segment indicate logic 1 
and 0. 

These techniques form the basis for 
measuring physical quantities through 
resistive sensors inexpensively. With 
very simple circuits much of the world 
may be sensed by your computer. 
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0130 


. 


BNE COLLCT NO, SAMPLE NEXT BLOCK 






0135 


J RESTORE ATARI UBLANK AND DMA 






0110 


; 




062A 


A960 


0115 




LDA **6 RESET BIT6 OF NMIEN 


062C 


8D0ED1 0150 




STA NMIEN ALLOW VBLANK INTERRUPT 


62F 


A922 


0155 




LDA *$22 SET DMA SHADOW REGISTER 


0631 


8D2F0 


2 0160 




STA DMASR LE:ET UBLANK SET HARDWARE 


0631 


60 


0165 




RTS BACK TO BASIC 


0635 




0170 




• END 


Listing 5: USF 


Functi 

0100 


on to Plot Trace Data 


f t t * 


»»»»..»».......,.»....,.»>, 






0105 










0110 


LISTING * 5 






0115 










0120 


ATARI USR FUNCTION TO PLOT A 






0125 


256 


BYTE LOGIC GRAPH FROM BIT 






0130 


NUMBER "LINE" OF THE DATA, 






0135 










0110 


usage: 






0115 


X=USR( 160 , data, one, zero, line) 






0150 










0155 


WHERE ! 






0160 


data IS THE ADDRESS OF THE 256 






0165 




BYTES OF DATA TO BE PLOTTED 






0170 


one 


IS THE LEFT HAND ADDRESS OF 






0175 




THE LOGIC HIGH LINE 






0180 


zero IS THE LEFT HAND ADDRESS OF 






0185 




THE LOGIC LOW LINE 






0190 


line IS THE MASK TO ISOLATE THE 






0195 




SPECIFIC BIT OF data TO BE 






0200 




PLOTTED 






0205 










0210 










0215 


THE 


FOLLOWING STEPS ARE PERFORMED! 






0220 










0225 


1) INITIALIZE 






0230 


2) FOR EACH BYTE OF DATA! 






0235 




ISOLATE BIT "LINE" 






02.10 




IF BIT=0 THEN 






0215 




SET BIT IN ONE LINE 






0250 




ELSE 






0255 




SET BIT IN ZERO LINE 






0260 




ENDIF 






0265 




ROTATE THE MASK PATTERN RIGHT 






0270 




IF ALL 8 BITS THEN 






275 




RESET THE MASK 






280 




INCREMENT THE GRAPH INDEX 






0285 




ENDIF 






0290 










0295 


note: DUE TO THE WAY THE GRAPHICS 






0300 


SCREEN IS ADDRESSED, THE LaBLES 






0305 


ONE 


AND ZERO SEEM BACKWARD. 






0310 










0315 










0320 


.... 


... j ....... t .»>..... . . . . . t . 






325 










0330 






OOCB 




0335 [ 


3ATA 


$0 CB FOR DATA ADDR STORAGE 


OOCD 




0310 ( 


3NE 


*0 0CD FOR LOGIC HIGH ADDR STORAGE 


OOCF 




0315 ; 


JERO 


tOOCF FOR LOGIC LOW ADDR STORAGE 


00D1 




0350 L 


-INE 


*0 0D1 BIT MASK 


06FF 




0355 [ 


5INDEX = *0 6FF DATA INDEX 


06FE 




0360 ( 


5INDEX = $06FE GRAPH INDEX 


06FD 




0365 ^ 

0370 

0375 


1ASK 


*06FD TO SET BIT IN GRAPH 


0000 




0380 
0385 




*= *0610 FREE ATARI RAM 






0390 


INITIALIZE 






0395 
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Listing 5 (Continued) 










0640 


68 


0100 


PLOT 


PLA 




* OF USR ARGUMENTS 


0611 


68 


0105 




PLA 




GET DATA ADDRESS 


0612 


85CC 


0110 




STA 


DATA+1 


MSB 


0611 


68 


0115 




PLA 






0615 


85CB 


0120 




STA 


DATA 


LSB 


0617 


68 


0125 




PLA 




GET ONE LINE ADDRESS 


0618 


85CE 


0130 




STA 


ONE+1 


MSB 


061A 


68 


0135 




PLA 






61B 


85CD 


0110 




STA 


ONE 


LSB 


061D 


68 


0115 




PLA 




GET ZERO LINE ADDRESS 


061E 


85D0 


0150 




STA 


ZERO+1 


MSB 


0650 


68 


0155 




PLA 






0651 


85CF 


0160 




STA 


ZERO 


LSB 


0653 


68 


0165 




PLA 




GET PORTB LINE MASK 


0651 


68 


0170 




PLA 




ONLY 8 BIT VALUE 


0655 


85D1 


0175 




STA 


LINE 


LSB 


0657 


A900 


0180 




LDA 


*$00 




0659 


8DFF06 


0185 




STA 


DINDEX 


INIT DATA INDEX 


065C 


8DFE06 


0190 




STA 


GINDEX 


INIT GRAPH INDEX 


065F 


A901 


0195 




LDA 


*$01 




0661 


8DFD06 


0500 
0505 
0510 




STA 


MASK 


GRAPHICS BIT POSITION 






! PLOT EACH 


BYTE OF THE 256 BYTE 






'0515 


! BLOCK OF 


DATA 








0520 


j 








0661 


ACFF06 


0525 


PLOTLP LDY 


DINDEX 


DATA INDEX 


0667 


B1CB 


0530 




LDA 


(DATA) ,Y 


GET BYTE OF DATA 


0669 


25D1 


0535 




AND 


LINE 


ISOLATE TO SINGLE BIT 


66B 


D00C 


0510 
0515 
0550 




BNE 


NE0 


PLOT <> VLAUE 


066D 


ACFE06 


, 


LDY 


GINDEX 


GRAPH INDEX 


0670 


ADFD06 


555 




LDA 


MASK 


CURRENT BIT POSITION 


0673 


11CD 


0560 




ORA 


(ONE) ,Y 


SET BIT 


0675 


91CD 


0565 




STA 


(ONE) ,Y 


REPLACE IN GRAPH 


0677 


D00A 


0570 
0575 
0580 




BNE 


NEXT 


BRANCH ALWAYS 


0679 


ACFE06 


NE0 


LDY 


GINDEX 


GRAPH INDEX 


67C 


ADFD06 


0585 




LDA 


MASK 


CURRENT BIT POSITION 


067F 


11CF 


0590 




ORA 


( ZERO ) , Y 


SET BIT 


0681 


91CF 


0595 
0600 


. 


STA 


(ZERO) ,Y 


REPLACE IN GRAPH 


0683 


18 


0605 


NEXT 


CLC 




ROTATE MASK THRU CARRY 


0681 


6EFD06 


0610 




ROR 


MASK 


NEXT BIT IN GRAPH 


0687 


D001 


0615 




BNE 


SKIP 




0689 


6EFD06 


0620 




ROR 


MASK 


ROTATE INTO BIT7 


68C 


C8 


0625 




INY 




PLOT TO NEXT GRAPH BYTE 


068D 


8CFE06 


0630 


SKIF 


STY 


GINDEX 


RESTORE GRAPH INDEX 


0690 


EEFF06 


0635 




INC 


DINDEX 


NEXT BYTE OF DATA 


0693 


D0CF 


0610 




BNE 


PLOTLP 


FOR ALL 256 BYTES 


0695 


60 


0615 




RTS 




RETURN TO BASIC 


0696 




0650 




.END 






Listing 6: BASIC Program TRACE 






1 RF.M 




T R 


A C E - 








2 REM - 












3 REM - Low Resolution Logic Analyser 




1 REM - an 


d 555 


Tiner A/D C 


o river ter 




5 REM - 












6 REM - 


by Mike 


Dougher 


ta 




7 REM - 












8 RE 
























9 REM 












1110 DIM BYTE*<2>,DATA*<102 


1) 




1115 TRAP 


200 tREM WHEN ALL. 


USR FUNCTIONS HAVE BEEN POKED 


1120 READ 


ADDRtREM STARTING 


ADDRESS OF CODE 


1.130 FOR CODEX) 


TO 1 


STEP 






1110 READ 


BYTE* 


REM 


BYTE OF 


CODE 




115 


] IF BYTE*-"**" THEN SOUND 0,0,0,0 


JGOTO 1120 tREM GET NEXT 




USR FUNCTION 








1 1 AC 


GuSUB 


1100! 


REM 


CONVERT 


BYTE*->BYTE 


117C 


POKE 


addr,byte: 


REM PLACE IN MEMORY 


1.175 ADDR" 


WDR + l 










11BC 


NEXT 


CODE 










HOC 


REM 












1101 


REM - 


--CONVERT 


BYTE* TO BYTE 




1102 REM 












1111 


BYTE* 













112C 


V="ASC(BYTE*<1>) 


:gosub 


1500 




113C 


V«ASC(BYTE*<2> ) 


:gosub 


1500 




111C 


RETURN 










150C 


REM 
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PROFESSIONAL 

WORD PROCESSOR 



Double Columns 
Right Justification 
Printer Graphics 
Variable Line Space 
Printer Control Code 



Page by Paragr; 



Shorthand 
Margin Conti 



FOR APPLE/PET/CBM 

COPY-WRITER Df 

only $185.00 



EXCHANGE DATA w IBM 3740 

PEDISK II 877 FLOPPY DISK Sys- 
tems can now read and write records 
from IBM "Basic Data Exchange" 
"" type diskettes. FILEX software from 

"- ' WILSERVE does all the work! Con- 
^fe. verts EBCDIC - ASCII. 

EXCHTttaS#8ystem (877/FILEX) $1 295. 

PEDISK 877-1 8' Floppy for PET $ 995. 

PEDISK 540-1 5' Floppy lor PET $ 595. 

CONTROLLER BOARD w POOS $ 229. 

PEDISK II is a high performance floppy disk 
system designed- for the Commodore PET/CBM, 
Rockwell AIM and Synertek SYM. It features high 
performance, simple reliable design and IBM for- 
mat. 

SOFTWARE FOR PEDISK II 

COPYWRITER Pro Word Processor $185. 

MAE Macro Assembler Editor by EHS $1 70. 

FLEXFILE II Data Base Manager $ 80. 

PAPERMATE Word Processor $ 60. 

DISK UTILITY PACK $ 25. 

FASTFILE Data Base $100. 

FILEX IBM Access Routines $245. 

MENU LOAD $ 10. 

fu»FORTH+ $100. 



Commodore Communicates! 

COMPACK $129. 

Intelligent Teminal Package 
including: ACIA based interface 

DB25 cable 

STCP software 

> Remote Telemetry *' XON-XOFF Control 
1 Transfer to/fr Disk * User Program Cntl 
' Printer Output v Status Line 



$1 39 COLOR CHART 

AIM/SYM system video display, 64 x 1 6 

characters, 8 colors, plugs into ROM 

socket, 4K RAM Multiple modes; semi 

graphics, alpha. 

PET/CBM color graphic display, 1 28 x 

192 pixels, generate color bar graphs 

on one screen with data on main 

screen. RS170 video color chart. 

6847 based video output. 

COLOR VIDEO FOR PET/CBM/AIM/SYM 



ROMSWITCH-4 ROMS IN 1 

SPACEMAKER $39.95 

Switch 4 ROMs into the same socket. 
A slide switch activates one of four. 
Electronic controls insure no glitches 
and allow ROM switching under soft- 
ware control. ROMs can be switched 
from the keyboard. 

fiillFORTH+ for APPLE/PET 

FULL FIG FORTH implementation plus 
conditional assembler, floating point, 
string handling, multi-dimensional arrays, 
and disk virtual mamory. 

fullFORTH+ from IDPC Co $100. 

Target Compiler $ 50. 



SEE YOUR DEALER OR: 

P.O. Box 102 
Langhorne, Pa. 19047 
215-757-0284 

DEALER INQUIRIES INVITED 



(MICROTECH) Lan 

x ' 215 
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ELCOMP 



BOOKS 

and SOFTWARE 

For ATARI-PET-OSI-APPLE ll-6602-VIC-20-Sindair--TimeK 



ATARI ATARI ATARI ATARI 



ATARI BASIC - Learning by 

Using 

This new book is an "Action"- 
Boofc. You do more than read it. 
LBarn the intricacy o f ATARI- 
BASIC thorugh the short programs 
which are provided. The 
suggestions challenge you to 
change and write program 
routines. Yes, it's exciting - 
Many of the programs are 
appropriate for beginners as well 
as experienced computer users. 
(Screen Drawings, Special Sounds, 
Keys, Paddles + Joysticks. 
Specialized Screen Routines, 
Graphics and Sound. Peeks and 
Pokes and special stuff ). 
Order-No. 164 89.96 

ATARI Learning by Using — 
Book + cassette or disk 
This package includes the book 
No. 164 plus a cassette or disk 
(please specify) containing a 
variety of the programs which 
are listet in the book. 
Order No.: 7220 S 39.96 

Games for the ATARl-Computer 
How to program your own games 
on the ATARI. Complete listings 
in BASIC and Machine Language 
of exciting games. Tricks end 
hints. 

Order-No. 162 7.95 

GAME PACKAGE for the ATARI 
Book + cassette or disk 
Includes the book No. 162 plus 
cassette or disk (please specify) 
containing a variety of the pro- 
grams listed in the book. 
Order No. 7221 839.96 

ATMONA-1 

Machine Language Monitor for 
the ATARI 400/800. 
This powerful monitor provides 
you with the firmware support 
that you need to get the most 
out of your powerful system. 
ATMONA-1 comes on a bootable 
cassette. No cartridges required. 
Disassemble, Memory Dump HEX 
+ ASC II, ( Change Memory 
Locations, Blocktransrfer, fill 
memory block, save and load 
machine language programs, start 
mach. Lang. Progr. (Printer 
optional). 

Comes with Introductionary 
article on how to program the 
ATAR I computer in machine 
language. (Available also in ROM) 
Order-No. 7022 819.95 



ELCOMP FORTH - Enhanced 
FIG-FORTH on disk only. 
Order No. 7055 839-96 



How to connect your EPSON- 
Printer to the ATARI 400/800. 

Construction article with printed 
circuit board and software. 
(Screen print and variable charac- 
ters per line). 
Order-No. 7210 819-95 



OS^OSl 
TheFirtt 



1 01 

B 



[SIOSIOSI 



of Ohio Scientific 

Introduction to OSI computers. 
Diagrams, hardware and software 
information not previously 
available in one compact source. 
192 pages. 
Order-No. 157 87-98 

The Second Book of OHIO 
Order-No. 158 87.95 

The Third Book of OHIO 

Order No. 159 87.95 

The Fourth Book of OHIO 
Order-No. 160 8935 

VIP Package - Above book plus 
a cassette with the programs. 
Order-No- 160A 819.95 

The Fifth Book of OHIO 
Order-No. 161 87.96 

Invoice Writing Program for OSI- 
C1PMF, C4P. Disk and Cassette, 
8K RAM. 
Order-No. 8234 629.90 

Mailing Lift for C1PMF or 
C4PMF 24K RAM 
250 addresses Incl. phone number 
and parameters on one S 1/4 disk) 
Order-No. 9240 829.80 

8K Microsoft BASIC Ref. Man. 
Order-No. 151 8935 

Expansion Handbook for 6502 

and 6802 

Order-No. 152 6935 

Microcomputer Apfri. Notes 
Order-No. 153 69.96 

Complex Sound Generation 

New revised applications manual 
for the Texas Instruments SN 
76477 Complex Sound Genera- 
tor. 
Order-No. 154 6636 

Small Business Programs 
Complete listings for the business 
user. Inventory, Invoice Writing, 
Mailing List and much more. 
Introduction to Business Appli- 
cations. 

Order-No. 156 81430 

Microcomputer Hardware Hand- 
book (845 pages) 

Descriptions, plnouts and specifi- 
cations of the most popular 
microprocessor and support chips. 
A MUST for the hardware buff. 
Order-No. 29 814.96 



ATMONA-2 i 

A very powerful Tracer to explore 
the ATARI ROM/RAM area. Stop 
at previously selected address. 
Opcode or operand (cassette!. 
Order-No. 7049 84935 

EDITOR/ASSEMBLER for 
ATARI 800, 32K or 48K HAM 
Extremely fast and powerful 
Editor/Assembler. IBK Source- 
code in about 5 seconds) Includes 
ATMONA-1 . 
Order-No. 7098 849.95 

MACRO-Atsentbler 

for ATARI BOO, 48K RAM 

Please specify your system: RAM, 

disc or cassette. 

Order-No. 7099 689.00 

Add 839.00 for eartnooa version 

Gurrfight - For ATAH I 400/800 

16K RAM, needs two joysticks, 

animation and sound. (8K machine 

language). 

Order-No. 7207 81935 

Birth control with ttw ATARI 

[Knaus Ogino) Cass, or disk 
Order No. 7222 829.96 

Astrology and Biorhynhm for 
ATARI (caw. or disk) 
Order No. 7223 829.96 

EPROM Cartridge KIT for ATARI 

Cartridge (bare board) with in- 
structions (holds two 16K or two 
32K EPROMs (2716,2532,2732) 
Order No. 7224 81936 

Order No. 7043 complete 629.95 

Invoice Writing for small 

business with ATARI 400/800 
16K RAM. 

Order-No. 7022. cass. 629.85 
Order-No. 7200, disc. 89.99 

Meiling-Ust No. 7213 82435 
Inventory Contr.No.7215 824.9S 

NEW I ATEXT-1 

This new wordprocessor in 
machine language (8K) for all 
ATARI 400/BOO computers offers 
the best price performance ever. 
23 editor control commands, 
17 formatting commands, dyna- 
mic formatting. Vertical and 
horizontal scrolling (up to 255 
char, per line) Include command 
on disk! 

Order No. 7210 cassette 82935 
Order No. 721 1 disk 839.96 
Order No. 7212 cartridge 879.00 

Leam FORTH for the ATARI 

400/800, cassette or disk 

Order No. 7063 619.96 

ELCOMP Publishing, Inc., 53 Redrock Lane 
Pomona, CA 91766, Phone: (714) 623 8314 
Check, Money Order, VISA. Mastereriargo, Eurochecfc. 
POSTPAID on PREPAID in USA. 86.00 handling fee for COD. 
All orders outside USA: Add 15% nipping. CA add 6.6% sales tax. 
ATARI is a registered trademark of ATARI Inc. APPLE is a registered 
trademark of APPLE Inc. PET+V1C-20 is a trademark of Commodore. 



Care anc 
Commodore PET 
Eight chapters axploring PET 
hardware. Includes repair and 
interfacing information. Pro- 
gramming tricks and schematics. 
Order-No. 160 8935 

Prototype-Expansion Board for 
vic-20 (S-44-Buil. 
Order-No. 4844 81835 

Wordprocessor f.VIC-203K RAM 
Order No. 4870 8193S 

Mailing List for VIC-20, 16k RAM 
Order No. 4883 814.96 

Tricka for VIC* - The VIC*tory 
Programs, hints and expansion 
information for VC-20 
Order No. 141 89.96 

TIC TAC VIC 

Order No. 4880 89.96 

GAMEPACK I (3 Games! 
Order No. 48S1 614.96 

Dual Joystick Instruction 
Order No. 4886 8936 

INPUT/OUTPUT Programming 
with your VIC 
Order No. 4886 893S 

16K RAM/ROM board for 544- 

bus. Any combination of RAM 

and ROM on one board. 

(SY212Bor2716> 

Order-NO. 613 83936 

Low cost expanison boards for 

your APPLE II. Bare board comes 

with extensive description and 

software. 

9522 VIA-I/O Exp. 

Order-No. 605 839.00 

2716 EPROM-Burner 

Order-No. 607 64930 

8K EPROM/RAM Card 

Order-No. 609 829.00 

Software for SINCLAIR ZX-81 

and TIM EX 1000 

Machine Language Monitor 

Order No. 2399 8936 

Mailing List 

Order No. 2398 81936 

Programming in 8 ASIC and 

machine language with the 

ZX-81 (82) or TIMEX 1000. 

Order No. 140 (book) 89.96 



Listing 6 (Continued) 

1510 IF v<58 THEN BYTE«BYTE*16+U-4B 
1528 IF V>57 THEN BYTE-BYTEX16+V-55 
1530 SOUND 0, BYTE, 10, 8 
1540 RETURN 

1600 REM 

1601 REM SAMPLE THE PORT EVERY 19 

1602 REM —CYCLES AND STORE INTO 

1603 REM THE BYTE ARRAY, DATA*. 

1604 REM 

1605 DATA 1536 

1610 DATA 6B,68,85,CC,68,85,CB 

1615 DATA AO,00,A2,04,A9,QO,8D,2F,02 

1617 DATA A5,14,C5,14,F0,FC 

1625 DATA A9,20 ,8D,0E,D4 

1630 DATA EA,EA,AD,01,D3,91,CB 

1635 DATA C8,D0 ,F6, E6,CC,CA, DO ,F 1 

1640 DATA A9,60,8D,0E,D4,A9,22 

1645 DATA 8D,2F, 02,60 

1695 DATA ** 

1700 REM 

1701 REM PLOT A ROW OF DATA* ON 

1702 REM THE SCREEN AS DEFINED 

1703 REM BY THE ARGUMENTS. 

1704 REM 

1705 DATA 1600 

1710 DATA 68,68,85,CC,68,85,CB 
1715 DATA 68, 85, CE, 68, 85, CD 

1720 DATA 68, 85, DO, 68, 85, CF 

1721 DATA 68,68, 85, Dl 

1722 DATA A9 , 00 , 8D.FF , 06 ,8D,FE , 06 
1725 DATA A9 , 01 ,8D, FD, 06 

1730 DATA AC,FF,06,B1,CB,25,D1 
1735 DATA DO , OC, AC,FE,06, AD,FD,06 
1740 DATA 11, CD, 91, CD, DO, OA 
1745 DATA AC ,FE, 06, AD,FD , 06 

1747 &ATA 11,CF,91,CF 

1750 DATA 18,6E,FD,06,DO,04 

1752 DATA 6E,FD,06,C8 

1755 DATA 8C,FE,06 

1757 DATA EE,FF, 06, DO ,CF,60 

1795 DATA x* 

1800 REM 

1801 REM SAMPLE A BIT DEFINED BY 

1802 REM THE ARGUMENT MASK AND 

1803 REM MEASURE THE TIME THE 

1804 REM PULSE IS HIGH IN 19 CYCLE 

1805 REM TIME UNITS. 

1806 REM 

1810 DATA 1696 

1812 DATA 68,68,68,85,01 

1815 DATA A9,00,8D,2F,02,AA,A8 

1820 DATA A5,14,C5,14,F0,FC 

1825 DATA A9,20 ,8D,0E,D4 

1830 DATA AD,01,D3,25,D1,D0,F9 

1835 DATA AD, 01 ,D3,25,D1 ,F0 , F9 

1840 DATA E8,D0 r 0C,C8,A5,FF,AD,01,D3 

1845 DATA 25, 01 ,D0 ,F3,F0 ,09 

1850 DATA EA,EA,AD,01,D3,25,D1,D0,E8 

1855 DATA 86 ,D4 , 84,05, A9 ,60 

1860 DATA 8D,OE,D4,A9,22,8D,2F,02,60 

1895 DATA xx 

20 REM 

2001 REM -REPEAT FOREVER: 

2002 REM - INPUT THE LINE MASK TO 

2003 REM - CONTROL THE LINE SAMPLED J 

2004 REM - SET UP SCREEN FOR TRACE, 

2005 REM - DO UNTIL "ESCAPE" KEY I 

2006 REM - IF KEY = "A": 

2007 REM - PERFORM A/D ON LINE 

2008 REM - DEFINED BY LINEMASK, 

2009 REM - TURN OFF KEY J 

2010 REM - ELSE IF KEY = "C"J 

2011 REM - PERFORM A/D ON LINE 

2012 REM - DEFINED BY LINEMASK, 

2013 REM - ELSE IF KEY = "T": 

2014 REM - TURN OFF KEY, 

2015 REM - DO A TRACE OF PORT J 

2016 REM - PLOT BIT DEFINED BY 

2017 REM - LINEMASK, 

2018 REM - ENDIF, 

2019 REM - ENDD0, 

2020 REM -END REPEAT. 

2021 REM 

2022 REM 

2110 GRAPHICS 
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Listing 6 (Continued) 


2120 


POSITION 10,10!PRINT "Line Mask "J 


2130 


INPUT LINEMASK 


2110 


REM 


2150 


REM 


2210 


GRAPHICS 8 SPOKE 752,1 


2220 


SETCOLOR 1,6,11 


2230 


SETCOLOR 2,6,1 


2210 


COLOR 1 


2250 


REM 


2260 


REM 


2110 


FOR LOOP=0 TO 1 STEP 


2115 


PRINT " T - trace A - A/D " 


2120 


IF PEEK(761)=63 THEN PRINT " T - trace A - A/D ";"A/D: "j 


USR( 1696, LINE MASK) SPOKE 761,255 


2121 


IF PEEK (761) =28 THEN POKE 761, 255: GOTO 20 


2122 


IF F'EEK(761) = 18 THEN PRINT " T - trace A - A/D ";"A/D*. "J 


USRC 1696, LINE MASK) 


2123 


IF PEEK ( 761 )<>15 THEN 2120 


2121 


POKE 761,255 


2130 


X=USR(1536,ADR(DATA$) ) :REM TAKE TRACE 


2500 


REM 


2501 


REM PLOT TRACE IN 1 SEGMENTS, 


2502 


REM 256 VALUES IN EACH LINE 


2503 


REM POKE -DIRECTLY INTO MEMORY 


2.501 


REM WITH THE USR FUNCTION. 


2505 


REM THE ADDRESSES USED ARE 


2506 


REM COMPUTED IN BASIC AND 


2507 


REM PASSED AS USR ARGUMENTS. 


250 8 


REM 


2510 


GRAPHICS StPOKE 752,1 


252 


SETCOLOR 1,6,11 


2530 


SETCOLOR 2,6,1 


2510 


COLOR 1 


2610 


SCREEN=PEEK(106)x256-7373:REM LEFT ADDRESS OF TOP LINE 


2620 


FOR LINE=0 TO 3:REM EACH 256 BYTE LINE 


2630 


X=USR (160 0, ADR ( DATA* ) +LINE*256 , SCREEN+LINE* 1 280+610 ,SCREEN+LINE 


X128C 


.LINEMASK) 


2610 


NEXT LINE 


2710 


FOR LINE=0 TO 3! REM ADD LOGIC LEVEL MARKS ON LEFT 


2720 


PLOT 20,12+LINE»32 


2730 


DRAWTO 20,12+LINE*32+16 


2710 


NEXT LINE 


2810 


NEXT LOOP JMCftO 



»■•][*■ 



A 



MEMOREX 

\ferbatim. 

maxell 

BASF 
wabash 



Diskettes and all your media needs 
Our REGULAR prices are SPECIAL 

CALL FREE (800) 421-3957 

C.O.D. charge cards accepted. 
Excellent dealer program. 




\ 



1418 West Shaw Avenue 
Fresno. CA 93711 

In CaL call 1209) 221-1118 

foothill of The Sierras 



/ 



S^r 



cW^er-Magic,^ 



MACHINE LANGUAGE SPEED 
WHERE IT COUNTS... 

IN YOUR PROGRAM! 



For the first time, Amper-Magic makes It easy for people who don't know 
machine language to use its power! Now you can attach slick, finished machine 
language routines to your Applesoft programs in seconds! And interface them 
by name, not by address! 

You simply give each routine a name of your choice, perform the append pro- 
cedure once at about 15 seconds per routine, and the machine language becomes a 
permanent part of your BASIC program. (Of course, you can remove it if you want to.) 

Up to 255 relocatable machine language routines can be attached to a BASIC 
program and then called by name. We supply some 20 routines on this disk. More 
can be entered from magazines. And more library disks are in the works. 

These routines and more can be attached and accessed easily. For example, 
to allow the typing of commas and colons in a response (not normally allowed in 
Applesoft), you just attach the Input Anything routine and put this line in your program: 

xxx PRINT "PLEASE ENTER THE DATE."; : & INPUT,DATE$ 



&MAGIC makes it Easy to be Fast & Flexible! 

PRICE: $75 



&-Magic and Amper-Magic are trademarks of Amhro-Digiial, Inc. 
Applesoft is a trademark of Apple Computer, Inc. 



Some routines on this disk are: 

Binary file info 

Delete array 

Disassemble memory 

Dump variables 

Find substring 

Get 2-byte values 

Gosub to variable 

Goto to variable 

Hex memory dump 

Input anything 

Move memory 

Multiple poke decimal 

Multiple poke hex 

Print w/o word break 

Restore special data 

Speed up Applesoft 

Speed restore 

Store 2-byte values 

Swap variables 



Anthro - Digital Software 

P.O. Box 1385 
Pittsfield, MA 01202 

The People - Computers Connection 
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NEW FROM D & N MICRO PRODUCTS, INC. 




MICRO-80 COMPUTER 



Z80A CPU with 4MHz clock and CP/M 2.2 
operating system. 64K of low power static 
RAM. Calendar real time clock. Centronics 
type parallel printer interface. Serial inter- 
face for terminal communications, dip 
switch baud rates of 150 to 9600. 4 "cooling 
fan with air intake on back of computer and 
discharge through ventilation in the bot- 
tom. No holes on computer top or side for 
entry of foreign object. Two 8" single or 
double sided floppy disk drives. IBM single 
density 3740 format for 243K of storage on 
each drive. Using double density with 1K 
sectors 608K of storage is available on a 
single sided drive or 1.2 meg on a double 
sided drive. Satin finish extruded 



aluminum with vinyl woodgrain decorative 
finish. 8 slot backplane for expansion. 4{ 
pin buss is compatible with most OS 
boards. Uses all standard IBM format CP/fV 
software. 

Model 80-1200 $299£ 

2 8" single sided drives, 1.2 meg ol 
storage 
Model 80-2400 $349e 

2 8" double sided drives, 2.4 meg of 

storage 
Option 001 $ 95 

Serial printer port, dip switch baud rate 

settings 



Software available in IBM single density 8" format. 

Digital Research Mlcropro 

PL/1-80 $459 Wordstar $299 

Mac $ 85 Mail-Merge $109 

Sid $ 78 Spellstar $175 

Z-Sid $ 95 SuperSortl $195 

CBasic-2 $110 Pascal 

Tex $ 90 Pascal/MT+ $429 

DeSpool $ 50 Pascal Z $349 

Ashton-Tate Pascal M $355 

dBase II $595 

Convert almost any static memory OSI machine to CP/M® with the D & N-80 CPU Board. 



Microsoft 




Basic-80 


$289 


Basic Compiler 


$329 


Fortran-80 


$410 


Cobol-80 


$574 


Macro-80 


$175 


Edit-80 


$105 


MuSimp/MuMath 


$224 


Mu Lisp-80 


$174 



Z80A CPU with 4MHz clock. 2716 EPROM 
with monitor and bootstrap loader. RS-232 
serial interface for terminal communica- 
tions or use as a serial printer Interface in a 
VIDEO system. Disk controller is an Intel 
8272 chip to provide single or double densi- 
ty disk format. 243K single density or 608K 
double density of disk storage on a single 
sided 8" drive. A double sided drive pro- 
vides 1.2 meg of storage. DMA used with 
disk controller to unload CPU during block 
transfers from the disk drives. Optional 
Centronics type parallel printer port com- 



plete with 10 ft. cable. Optional Real Time 
Calendar Clock may be set or read using 
'CALL' function in high level languages. 
Power requirements are only 5 volts at 1.4 
amps. Available with WORDSTAR for serial 
terminal systems. 






D&N-80 serial 


$695 


D&N-80 serial w/Wordstar 


$795 


D&N-80 video 


$695 


Option 001 


$ 80 


parallel printer and real ti 


me 


calendar clock 






Ml I 

win 



D & N-80 CPU BOARD 



OTHER OSI COMPATIBLE HARDWARE 



IO-CA1 0X Serial Printer Port $125 

Compatible with OS-65U and OS-65D soft- 
ware 

IO-CA9 Parallel Printer Port $175 

Centronics standard parallel printer inter- 
face with 10 ft. flat cable 
BP-580 8 Slot Backplane $ 47 

Assembled 8 slot backplane for OSI 48 pin 
buss 



24MEM-CM9 $380 

16MEM-CM9 $300 

8MEM-CM9 $210 

BMEM-CM9F $ 50 



24MEM-CM9F $530 

16MEM-CM9F $450 

8MEMCM9F $360 

FL470 $180 



24K memory/floppy controjler card sup- 
ports up to 24K of 2114 memory chips and 
an OSI type floppy disk controller. 
Available fully assembled and tested with 
8, 16, or 24K of memory, with floppy con- 
troller (F). Controller supports 2 drives. 
Needs separated clock and data inputs. 
Available Bare (BMEM-CM9F) or controller 
only (FL-470). Ideal way to upgrade 
cassette based system 



C1P-EXP Expansion Interface $ 65 

Expansion for C1 P 600 or 610 board to the 
OSI 48 pin buss. Requires one slot in 
backplane. Use with BP-580 backplane 
BIO-1600 Bare 10 card $ 50 

Supports 8K of memory, 2 16 bit parallel 
ports may be used as printer interfaces. 5 
RS-232 serial ports, with manual and Molex 
connectors 

DSKSW Disk Switch $ 29 

Extends life of drive and media. Shuts off 
minifloppy spindle motor when system is 
not accessing the drive. Complete KIT and 
manual 

D & N Micro Products, Inc 

3684 N. Wells St. 

Fort Wayne, Ind. 46808 

(219)485-6414 



$395 
$585 
$ 69 

$450 

$ 75 






TERMS $2.50 shipping, Foreign orders add 15%. 
Indiana residents add 4% sales tax. 



Disk Drives and Cables 
8 " Shugart SA801 singlesided 
8 "ShugartSA851 double sided 
FLC-66ft. cable from D & N or OSI 

controller to 8 * disk drive 
5 1/4" MPI B51 with cable, power 

supply and cabinet 
FLC-5 1/48 ft. cable for connection 

to 5 1/4 drive and D & N or OSI 

controller, with data separator and 

disk switch 
Okldata Mlcroline Printers 
ML82A Dot Matrix Printer $534 

120 CPS, 80/1 20 columns, 9.5 " paper width, 
friction or pin feed 

ML83ASameas82Aexcept $895 

16" paper width, 132/232 columns with 
tractor feed 

M L 84 Same as 82A except 200 CPS, $1152 
16" paper width, 132/232 columns, 2K buf- 
fer, dot addressable graphics, with tractor 
feed 
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Delayed Reset and Autob 

for the OSI 



••!•!• 



by Ugo V. Re 



The following two circuit 
modifications to an OSI 
computer will enhance the 
capabilities of your system by 
adding a time delay to the 
action of the BREAK key 
(System RESET) and by 
providing an automatic boot-up 
of a disk system on power-up, or 
after a power failure. 



How often, while typing, have you hit 
the BREAK key when you wanted to hit 
the RETURN key? I've made this mis- 
take many times, and with a disk 
system it becomes very annoying to re- 
enter BASIC without booting-up the 
disk. 

One way to correct the problem is 
to relocate the BREAK key away from 
the keyboard. Another method is to add 
a time-delayed action to the BREAK 
(RESET) key similar to the method 
used by the C1P series 2 computer. I 
chose to add a time delay to RESET as 
this circuit would provide an additional 
benefit that then can be expanded to 
provide an automatic boot-up on 
power-up. 



Description of Delayed RESET 
Circuit 

Figure la is the Delayed RESET Cir- 
cuit Diagram. This circuit can be added 
to any OSI system including the C8P 
with the RESET key mounted in the 
computer case. 

A resistor placed in series with a 
capacitor will control the time it takes 
for a capacitor to fully charge or 
discharge. Because the capacitor's 
charge changes slowly it cannot be used 
to directly control the RESET pin on 
the 6502. The 6502 requires a rapid 
change from low to high to RESET the 
chip. The signal from the capacitor can 
be used, however, after it has been con- 



ditioned to change quickly from a low 
to high state. 

The 7414 IC is a Hex Schmitt Trig- 
ger that will produce a rapidly changing 
output signal from a slowly changing 
|charging capacitor) input signal. The 
output goes negative when the input 
exceeds 1.7 volts, and goes positive 
when the input drops below 0.9 volts. 
Two of the six gates are wired in series 
to invert the signal so that a low 
(BREAK key depressed) is applied to the 
RESET pin of the 6502 chip. 



Construction of Delayed RESET 
Circuit 

The Delayed RESET circuit can be 
built on a wire-wrap IC socket as 
follows: 

1 . Wire pin 2 to pin 3. 

2. Wire pins 5, 9, 11, and 13 to pin 14. 

3. Solder the 220 \iV capacitor be- 
tween pin 1 and pin 7 (positive side 
to pin 1). 



Figure la: Delayed RESET Circuit 

+ 5 VOLTS 



KEYBOARD 




7414 POWER 


7 


GND 


14 


+ 5V 



+ 5 VOLTS 



CPU BOARD 




Figure 1b: Auto Boot Circuit 
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4. Solder a 4.7K resistor to pin 1. 

5. Solder a 50 Q resistor to pin 14. 

6. Wire pin 14 to 5V and pin 7 to 
ground. 

7. Cut the red lead (trace on the 600 
board) that goes from the BREAK 
key, on the 542 board to pin 40, on 
the 6502 chip. 

8. Solder the loose ends of the 50 Q 
and 4.7K resistors together and 
wire to the red lead/trace from the 
BREAK key. 

9. Wire pin 4, 7414 IC to the red lead/ 
trace going to pin 40, of the 6502 
chip. 

10. Store the IC socket so that it doesn't 
short out to any other components. 

The combination of a 4.7K resistor 
and a 220 n F capacitor will give a time 
delay of about two to three seconds. 
Additional delay can be obtained by in- 
creasing the size of the capacitor. Do 
not increase the size of the resistors as 
the values shown are the maximum 
that can be used for reliable operation. 
With the circuit installed, the BREAK 
key must be depressed for two to three 
seconds before the screen will clear. 

With the Delayed RESET installed, 
the computer comes up in RESET at 
power-up. With a few more com- 
ponents we can use the signal from this 
circuit to provide an automatic boot-up 
at power-up. 



Description of Auto-Boot Circuit 

Figure lb is the Auto-Boot Circuit 
Diagram. This circuit provides an addi- 
tional time delay after RESET goes high 
before shorting the contacts of the "D" 
key to boot-up the disk system. 

In addition to supplying a signal to 
the 6502 microprocessor chip, the out- 
put of the 7414 IC |Schmitt Trigger) is 



Figure 2: Printed Circuit Board 




used to trigger one half of a 74123 IC 
(Monostable Multivibrator) . Its output 
is then used to trigger the second half of 
the 74123 in order to produce still 
another pulse to turn on the TIL117 
(Opto-Isolator). 

The 74123 can be triggered in two 
ways. If input A is held low, bringing 
input B from a low to high state will 
trigger the 74123. If input B is held 
high, bringing input A from a high to 
low state will trigger the 74123. As a 
result of a trigger, the Q output goes 
high and the Q output goes low, staying 
there for a time determined by the 
resistor and capacitor combination, 
before returning to their initial states. 

At power-up it takes one to two 
seconds for the capacitor (CI) to charge 
to approximately two volts before the 
output of the 7414 will change from a 
low to high state. This signal is sent to 



input Bl (first half of the 74123, inpu 
Al grounded), to trigger the 74123. Thi 
Ql output goes high for 100-200 mse< 
before returning to a low state. The Q] 
output is connected to input A2 (sec 
ond half of the 74123, input B2 is wirec 
to 5 volts), therefore, when it goes low 
it triggers the 74123. The Q2 outpu 
goes high and turns on the light 
emitting diode (LED) in TIL117. Thi; 
causes the photo transistor to switch 
on and short the contacts of the "D' 
key. After 100-200 msec, Q2 output 
returns to the low state and the photc 
transistor returns to an open circuit, 
with the "D" key no longer shorted. At 
this time the computer has booted-up 
BEXEC*. 

Construction of Circuit Board 

The Delayed RESET and Auto-Boot 
circuits should be built on a circuit 
board and mounted at the keyboard. In 
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Figure 3a: 542 Rev A. Keyboard 





DIODES 




TT 


AAA A 

tMVt 


TT 



R3 



^ 



Figure 3b: 542 Rev B. Keyboard 
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Figure 3c: 600 Board 



Figure 3: Location of C6 and R3 Leads 
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a C8P system it could be placed in the 
CPU case near the A15 circuit board. 

You can use point-to-point wiring 
with IC sockets mounted on a per- 
forated board, or you can make a 
printed circuit board (see figure 2 for 
the layout). Check for the correct 
orientation of the electrolytic capaci- 
tors and integrated circuits before 
soldering any components to the board. 



Figure 


4: Location of C6 and R3 Leads 
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Once the circuit board is completed 
it must be wired to five volts, ground, 
the BREAK key, and the contacts of the 
"D" key. This can be accomplished in 
one of three ways. 

The best method is to wire all leads 
directly to the contacts on the key- 
board. This method is the same for all 
keyboards. With the keyboard face 
down, the "D" key contact pads are 
the fourth group from the right-hand 
edge and the second group from the bot- 
tom edge. The topmost pad (the C6 
lead) should have a potential of 4-5 
volts and is wired to TIL1 17, pin 5. The 
bottom pad is wired to TIL 11 7, pin 4. 
The BREAK key contacts are also on 
the right-hand edge of the keyboard. A 
red and black pair of wires leave the 
keyboard and go to the CPU board. 
Power can be picked off at any IC — pin 
7 or 8 for ground, and pin 14 or 16 for 
five volts. 

Another method is to wire to a 
resistor, C6 lead, and diode, R3 lead, 
located on the keyboard. See figure 3 
for the location of these components. 

This last method can only be used if 
you have an A15 circuit board installed 
in your system. The C6 and R3 leads 
are extended from the keyboard to the 



A15 board via a 16-conductor cable and 
appear on pins 2 and 9 of the "A" 
keypad socket. See figure 4 for the loca- 
tion of socket and wiring points. Power 
is also available on the A15 board. The 
BREAK key leads, however, will have 
to be extended to this board and then 
routed to the CPU board. 

Now whenever you turn on the 
power, press the BREAK key, or if 
power returns after a power failure, 
your computer will boot-up and run 
BEXEC*. You can modify BEXEC* so 
that it will run a special program (home 
control, security, bulletin board, etc.), 
without any operator intervention. I 
have my system running continuously 
and have not yet had a problem. 

I would recommend that you do not 
run your system continuously without 
some form of motor control for the 
disks. See the article by N.E. Ingersoll 
in MICRO, September 1981, page 15. 1 
have this circuit installed in my C4P 
MF system and highly recommend it to 
reduce power consumption and disk 



The author may be contacted at 167 
Sprucewood Dr., Levittovra, NY 11756. 

Macao 
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• AP104 

Attache style cases for carrying and protecting a complete computer set-up. 
Constructed of the highest quality luggage material with saddle stitching. Will 
accommodate equipment in a fully operational configuration along with 
manuals, working papers and disks. Never a need to remove equipment 
from case. Simply remove lid, connect power and operate. 

• AP1 01 Apple II with Single Disk Drive $1 09 

• AP102 Apple II with Double Disk Drives 119 

• AP103 Apple II, 9 inch Monitor & Double Drives . . 129 

• AP104 Apple III, two additional Drives & Silentype 139 

• AP105 12 inch monitor plus accessories 99 

• P401 Paper Tiger 440/445/460 99 

• P402 Centronics 730/737 89 

• P403 Epson MX70 or MX80 89 

• P404 Epson MX1 00 99 

• P405 IDS 560 or Prism Printer 109 

• CC80 Matching Attache Case (5") 85 

• CC90 Matching Attache Case (3") 75 

• CC91 Matching Accessory Case 95 

compuTCf case company ^j^ 

5650 INDIAN MOUND CT. COLUMBUS, OHIO 43213 (614) 868-9464 i^™ 










s °5 



wmm^ 



V 






Tl«. 



N.T SHIt Retldenli Add Applicable Sain T_ 
We Acc.pl Mnlll Charge ind Vln 
Include SI. 00 hendllng 
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The 68000 

DREAM MACHINE 



Today you can enhance your Pet or Apple II with 
the power of today's fastest, most powerful 
microprocessor! Revel in the luxury of sixteen each 
32 bit registers! Perform a 32 bit add using one 
instruction, in less than a microsecond! Run 
graphics over a hundred times faster than Applesoft! 

What's that? None of the above interests you? 
Then go away so that we can address those persons 
who are interested! 

Now that there is no one here but us performance 
freaks, let us tell you about DTACK GROUNDED: 

Our product is real and available now. It was 
reviewed in the April PEELINGS II, including a . 
photograph on the front cover. It has also been 
reviewed in several club newsletters, such as 
Mini'app'les and the Keystone Apple Core. 

In 1981 most people didn't know about the 68000, 
so we started a newsletter called "DTACK 
GROUNDED, the Journal of Simple 68000 Systems." 
We have twelve issues in print, about 180 pages of 
information about the 68000 and other high 
performance processors. 

About our name: DTACK stands for 'DaTa 
ACKnowiedge'. That's pin 10 on the 68000 and is 
primarily responsible for the complexity of most 
68000 system designs. We tied pin 10 firmly to 
ground, which means that data is always 
acknowledged. So the processor always runs at full 
speed (not true of a lot of expensive 68000-based 
systems). 

Our approach does have some disadvantages. 
Grounding DTACK prevents hooking some 
peripherals directly to the 68000. However, we intend 
that the host computer perform all I/O functions (we 
can transfer 70,000 bytes/sec in either direction 
between the host and our 68000 board). The 
operating system is the operating system you now 
have since our board is designed as an attached 
processor to your personal computer (just the Pet or 
Apple II for now). 

We have 4K boards with 8MHz 68000s. From there 
we go up to 220K systems with 12.5 MHz (!) 68000s. 
The latter package is generally purchased for 
business purposes, of course. 

DIGITAL ACOUSTICS 

1415 E. McFadden, Ste. F 

Santa Ana, CA 92705 

(714) 835-4884 

Apple, Applesoft and Apple II are trademarks of Apple Computer Company. Pet i 



ARE YOU BORED? 

We designed our 68000 board primarily for the 
serious individual hacker. We have discovered that 
there are fewer of those than we anticipated! Did you 
buy one of the first Pets or Apples about four years 
ago? Remember how much fun you had? Because 
there wasn't much software back then, many of you 
wrote your own. 

These days every program that can be written for 
your Pet or Apple has been written, several times. So, 
a couple of years ago you started adding hardware 
accessories. And life became exciting for a few more 
months. Then, boredom city again! 

You want to know where all the hackers went? Go 
look in a mirror. Your problem is that there are no real 
challenges anymore. 

DO WE HAVE A CURE FOR YOU! 

When you begin looking into the 68000 you will 
discover there is little software available right now. 
That's because the 68000 is less than two years old. 
There was little software for the 6502 when it was 
less than two years old, you may recall. 

We now have new challenges and opportunities. 
Everything has not been done. There have been an 
enormous number of 68000 based systems 
announced! Ours is the only performance oriented 
68000 product which will improve the computer you 
already own (Pets and Apples for now). 

You want to have fun? Here is our experience: A 
simple but elegant 3-D Applesoft graphics demo runs 
in 53 minutes. We now have the identical package 
running in 10.3 seconds using a 68000 (with no 
cheating). That's a speed improvement of over 300 to 
1 ! There is absolutely no way that this can be done 
without a 68000! 

What? You like being bored? But you want to be 
bored at 68000 speeds? We have a solution for you: 
tuck yourself into a time capsule for the next four or 
five years. When you come out, all of the 68000 
software will have been written! 

But if you do not have a time capsule, you are 
going to have a problem very soon now as your 
computer associates start showing up with 
machinery that runs circles around your 6502. Aren't 
bragging rights in your local user group worth a few 
hundred dollars? 

DEALERS: We regret that all sales are factory 
direct. There is no retail discount. We adopted that 
policy to make it possible to offer a quality 68000 
product at a personally affordable price. 

i trademark of Commodore Business Machines. 



26 



MICRO - The 6502/6809 Journal 



No. 52 - September 198 



68000 FEATURE! 



The 68000 
and the Personal Computer 



by Laurence Kepple 



Your 6502 system is still a 
gateway to the future! This 
article discusses some of the 
hardware and software aspects 
of what promises to be an 
exciting market for the 68000 as 
an add-on to 6502-based 
systems. 

Very Large Scale Integration (VLSI) tech- 
nology has made it possible for Motor- 
ola to turn the CPU architecture of a 
minicomputer (Digital Equipment Cor- 
poration's PDP-11] into a micro- 
processor. The 68000 is so compact and 
so powerful that it threatens to erase 
the distinction between mini and 
microcomputers. The question now is: 
do you hold on to the minicomputer 
concept in the microprocessor world? 
Do you run two or more terminals on 
the 68000 as though it were still a 
PDP-11? Or do you adopt a "one per- 
son, one processor" philosophy? The 
Fortune 32:16 starts at about $5000 and 
may be able to support as many as 16 
terminals. The comparably priced 
Radio Shack Model 1 6 can support two 
terminals. The manufacturers of the 
SAGE n, which costs under $4000, 
have deliberately designed their 68000 
computer as a single-user system. 

Whatever approach is adopted, the 
rate at which companies are announc- 
ing new 68000-based systems makes 
one thing certain: the 68000 micro- 
processor has become a chip worth 
knowing. Fortunately, you do not have 
to buy an entirely new system to be 
able to work with the 68000. As is the 
case with the 6809, add-on boards are 
becoming available that allow you to 
use your 6502-based system as a foun- 
dation for work with a more advanced 
processor. 

For example, DTACK Grounded 
(1415 E. McFadden, St. F, Santa Ana, 
CA 92705) is now shipping peripheral 
boards for the Apple H and for the PET 
that allow users to join the 68000 with 
the 6502 as a co-processor. The cost of 
these boards ranges from $595 (for an 
expansion board with 4K of static 



RAM) to $1123 (for the same board 
with 92K). (See PEELINGS II, April 
1982, for a review of these products.) 
Company president Hal Hardenbergh, 
in his newsletter DTACK Grounded, 
has announced that the company will 
soon market less expensive boards with 
dynamic instead of static RAM. 

The name "DTACK Grounded" ex- 
plains the company's hardware ap- 
proach to getting the 68000 into the 
personal computer market. Pin 10 of 
the 68000, "DTACK", stands for DaTa 
ACKnowledged. The 68000 needs this 
pin to function with the asynchronous 
data bus for which it was designed by 
Motorola. By grounding DTACK, the 
68000 is made compatible with the 
synchronous data busses used in 
simpler personal computer systems. 

Using the 68000 as a co-processor 
with a 6502-based system can produce 
amazing improvements in execution 
speed. For example, a 3-D graphics 
demonstration included with the 
DTACK Grounded board runs in 30 
minutes, 5 seconds in Applesoft; 10 



minutes and 40 seconds in Applesoft 
with the 68000 handling floating point 
operations; and 45 seconds with the 
68000 running a machine-code program 
and the 6502 used exclusively for I/O. 
A graphics version of the 68000 floating 
point package that uses a 16-bit man- 
tissa produced the fastest time of all: 
18.9 seconds. 

There are other 68000 boards avail- 
able. Motorola itself recently announced 
an MC68000 Educational Computer 
Board. As its name suggests, the pur- 
pose of this board is to make it 
economical (cost: $495.00) for students 
and designers to get familiar with the 
68000. The board includes 32K of RAM 
and 16K of ROM firmware that pro- 
vides the user with debug/monitor 
functions, program entry, assembling, 
disassembling, and I/O functions. To 
simplify programming in the educa- 
tional environment, a primitive assem- 
bler/disassembler function allows pro- 
grams to be entered, displayed, and 
modified in assembly language. Espe- 
cially in this latter characteristic, 
Motorola's board resembles those of 



The DTACK Grounded 68000 board (with 12K of static RAM) attached to MICRO'S 
Apple II. The large (!) rectangular shape on the far right of the board Is the MC68000. 

(Photo by Loren Wright) 
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DTACK Grounded. Another company, 
Intellimac (6001 Montrose Rd., Rock- 
ville, MD 20852) has announced a 
68000 single-board kit, the 68 
Magnum, for $745.00. This board of- 
fers 128K of dynamic RAM, 16K bytes 
of firmware ROM/EPROM, and 16K 
bytes of user EPROM. The system's 
firmware offers features similar to 
those of Motorola's ECB. Also like the 
ECB, the Magnum requires the user to 
supply a power source and a CRT 
terminal. 

We assume that other companies 
are going to follow DTACK Grounded' s 
lead and design 68000 boards especially 
for specific personal computer systems. 
Micro Technology Unlimited (2806 
Hillsborough St., P.O. Box 12106, 
Raleigh, NC 27605J has announced a 
68000 expansion board for its 
6502-based system, the MTU-130 
microcomputer. Called the Data- 
mover- 256, the board provides a 68000 
processor and an additional 256K of 
RAM (price: $999.00). It seems that 
MTU is deliberately pursuing a 6502/ 
68000 environment, in which users get 
the best of both worlds: compatibility 
with a widely supported 8-bit micro- 
processor, and upgradability to the 
power of the 68000. At MICRO, we are 



interested in 68000 peripheral boards 
aimed at 6502 machines. The signifi- 
cance of such expansion boards goes 
beyond simply improving the execu- 
tion time of existing unprotected soft- 
ware. Bringing the 68000 out of the 
relatively exclusive minicomputer en- 
vironment into the personal computing 
world should greatly stimulate the 
development of software for the 68000. 
Given the power of the 68000, this 
would be a significant event. If the 
68000 ever achieves anything like the 
6502's level of support, the results 
could be awesome. 

Owners of 6502 systems who are 
considering entry into the 68000 world 
should be aware that, for some time, 
they will be strangers in a strange land. 
The production of software for the 
68000 is only beginning. Phase Zero, 
Ltd. (2509 N. Campbell Ave., Suite 
130, Tucson, Arizona 85719) has just 
started to market the first development 
software designed specifically for the 
6502/68000 environment. Called "The 
Apple E to MC68000 Cross- Assembler," 
the program, written in 6502 machine 
code, accepts 68000 assembly com- 
mands and produces 68000 object code 
(cost: $99.00). The program is intended 
to run on an Apple II equipped with a 



DTACK Grounded board. Clearly, i 
you start to develop 68000 software oi 
your Apple any time soon, you will b< 
one of the first. This is not the case fo 
those 6502 owners who opt for th 
6809 on boards such as those offered h 
Stellation Two and ESD Labs. Th 
6809 has a substantial base of excellen 
software, and two powerful operatinj 
systems, OS-9 and FLEX. 



However, one crucial event has 
already taken place that will influence 
the future of a substantial portion oi 
68000 development work: UNIX has 
won wide acceptance as the best oper- 
ating system for the 68000. One impor- 
tant reason for the UNIX-68000 con- 
nection is that UNIX was written foi 
the 68000' s minicomputer ancestor, 
the PDP-11. Created at Bell Labs, 
UNIX has received hundreds of man- 
years of additional development al 
some of America's leading universities. 
If microcomputer users can gain access 
to UNIX through the 68000, they wil] 
have an operating system of tremen- 
dous power. UNIX offers a vast numbej 
of utilities and a means of linking them 
into large constructs via "pipes." This 
makes designing large programs sim- 



OSI Disk Users 



Double your disk storage capacity 
Without adding disk drives 

Now you can more than double your usable floppy disk 
storage capacity — for a fraction of the cost of additional 
disk drives. Modular Systems' DiskDoubler ™ is adouble- 
density adapter that doubles the storage capacity of 
each disk track. The DiskDoubler plugs directly into an 
OSI disk interface board. No changes to hardware or 
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The DiskDoubler increases total disk space under OS- 
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to 163K for mini-floppies. With the DiskDoubler, each 
drive does the work of two. You can have more and 
larger programs , related files , and disk utilities on 
the same disk — for easier operation without constant 
disk changes. 

Your OSI system is an investment in computing power. 
Get the full value from the disk hardware and software 
that you already own. Just write to us, and we'll send you 
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™DiskDoubler is a trademark of Modular Systems . 

Post Office Box 16 C 
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Telephone 201 262.0093 
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pier, and encourages the fullest use of 
the modular approach in solving com- 
plex problems. In addition, UNIX is 
written in, and of course supports, the 
powerful programming language C. 

But the attempt to make UNIX the 
standard operating system for the 
68000 is not without difficulties. In the 
first place, UNIX itself has yet to be 
standardized. Because substantial de- 
velopment of UNIX was done at dif- 
ferent universities, and because UNIX 
was designed to be easily modifiable, 
the operating system assumed a some- 
what different form at each site. 
Variants include Revision 5, Revision 
6, Revision 7, and a recently announced 
System III. Another problem is that, 
while UNIX provides rich resources in 
terms of software development tools, it 
does not offer much application soft- 
ware — again, a situation that reflects 
the university setting in which UNIX 
was formed. The absence of an applica- 
tion orientation resulted in some UNIX 
deficiencies, such as the lack of error 
recovery for disk I/O. Finally, the 
language in which UNIX is written, C, 
while very powerful, is not nearly as 
portable as COBOL, for instance. 

Major efforts are now underway to 
solve these problems. Microsoft, the 
company that made BASIC famous, is 
attempting to achieve the same feat of 
standardization with UNIX. Microsoft's 
version of UNIX, called XENIX, sup- 
ports high-level languages that are well 
established in the microcomputer 
market: BASIC, COBOL, FORTRAN, 
and Pascal. Charles River Data, 
developer of the $20,000 Universe 68 
[the kind of system that Motorola had 
in mind when it designed the 68000), 
has also created UNOS to go along with 
it. In addition to C, UNOS supports 
FORTRAN, BASIC, and Pascal. 

Some software developers have 
preferred to create independent oper- 
ating systems that maintain com- 
patibility with UNIX. For example, the 
Mark Williams Company (1430 West 
Wrightwood, Chicago, Illinois 60614J 
has produced the COHERENT system, 
which it describes as "a totally in- 
dependent development' ' that nonethe- 
less is designed to preserve compati- 
bility with Revision 7 of UNIX. Like 
UNIX, COHERENT was initially de- 
veloped on the PDP-11. In addition to 
C, COHERENT supports a BASIC 
interpreter-compiler, XYBASIC. Mark 
Williams has just announced a version 
of COHERENT for the 8088-based IBM 
Personal Computer. The firm's presi- 
dent, Robert Swartz, noted that ex- 
isting PC operating systems such as 



MS-DOS and CP/M are "Model Ts" 
compared to the "Lear Jet" function- 
ality of a UNIX-like system. A 68000 
version of COHERENT is on the way. 

Not every 68000 operating system 
will be UNIX-based or UNIX-com- 
patible. Mindful of the relative lack of 
applications software that runs under 
UNIX, some manufacturers will try to 
use large libraries of applications pro- 
grams to induce buyers to stay with 
their non-UNIX but processor-indepen- 
dent operating systems. For example, 
Microcobol Products, Inc. (MPSI), 
developer of the BOS/ 5 and MBOS/5 
operating systems, plans to release a 
68000 version in the fall of 1982. The 
BOS/5 operating system is already 
available on a wide range of processors 
(Z80, PDP-11, 8086) and supports a 
large base of business applications pro- 
grams. Once the BOS/5 system is 
ported to the 68000, all of this applica- 
tions software will run without any 
recompilation or relinking. Another 
business-oriented, non-UNIX operating 
system is OASIS 16, the 16-bit version 
of an 8-bit operating system that sup- 
ports a substantial quantity of business 
software. 

However, UNIX will almost cer- 
tainly be the primary operating system 
used in the development of new appli- 
cations software for 68000 micro- 
computers. Some powerful micro- 
processor development tools, in addi- 
tion to those already part of UNIX, are 
being made available for the UNIX en- 
vironment. The Boston Systems Office 
(469 Moody St., Waltham, MA 02154) 
recently announced a delivery date in 
late June for UNIX-compatible versions 
of the more than 50 high-speed micro- 
processor assemblers, symbolic debug- 
gers, and linkers that they originally 
developed for the PDP-11. Given the 
close relationship between the 68000 
and the PDP-11, this minicomputer is 
an ideal software development system 
for 68000 systems running UNIX. 
BSO's strategy is to support such a 
development effort on the PDP- 1 1 . 

The low-cost availability of a chip 
with the power of the 68000 is good 
news for anyone who believes in the 
potential of microcomputers. Perhaps 
the best news of all is that we do not 
have to spend $5,000 or more for access 
to the 68000. Your 6502 system is still 
a gateway to the future. In time, the 
development effort at the minicom- 
puter level, in addition to the work 
done by microcomputer users them- 
selves, will produce microcomputer 
performance and capacity that we can 
hardly imagine today. 4MCRO" 
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Chances are, when you 
bought your first disk drive, it 
was an Apple. Now that you're 
ready for a second, take a look 
at Quentin. 

Our Apple* -Mate™ 5 1 A" Disk 
Drive is fully software transparent 
with Apple's DOS 3.3 operating 
system in full and half track 
operation. 

Add it to your present drive for 
greater capacity and faster access. 
Just plug it in and go to work. 

And the Apple- Mate has these 
High Performance advantages: 

ON TRACK HEAD SEEK 



the head onto the correct track. 
Time-consuming retries and 
disk-to-disk copying errors are 
virtually eliminated. 

SIEMENS^ DISK DRIVE 

The apple-beige unit is built 
around the highly reliable 



Siemens system with over 
10,000 lifetime hours. Shielded 
connecting cable also attached. 

LONG TERM 
DEPENDABILITY 

MTBF (Mean Time Between 
Failures) — 8,500 power-on hours, 
and the unit has a one-year 
warranty. 

COUNT ON QUENTIN 
FOR QUALITY 

Quentin Research was building 
disk systems for the computer 
industry when Apple was a little 
bud on the big computer tree, 
w ■ " ' 



ity and stand behind every system 
we sell you. 

But the best news may be the 
price— only $335.00 (40 tracks). 



A special introductory offer 
when you order Apple- Mate 
directly from us. 

So when you're ready to boost 
the juice on your Apple, add-on 
the Quentin Apple-Mate. 

To order: Check, money order, 
Visa or Mastercard number. Calif, 
residents add 6% sales tax. 
Allow one week delivery. 



RESEARCH, INC. 

19355 Business Center Drive 
Northridge, California 91324 
(213)701-1006 



MORE JUICE 
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Special 
Introductory 
Price: 
$335.00 



® Apple is a registered trademark of Apple Computer, Inc. 
tSiemens is a trademark of Siemens Corporation, 
'Apple- Mate is a trademark of Quentin Research, Inc., 
which does not manufacture Apple computers. 
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An MC68000 Overview 



by Tom Whiteside and Joe Jelemensky 



This article is the first in a two- 
part series by the authors 
describing the Motorola 
MC68000 microprocessor. This 
part describes the registers, 
instruction set and addressing 
modes. 



The second part will give some 
simple programming examples 
to illustrate programming 
techniques and special features 
of the MC68000. 



The Motorola MC68000 is rapidly be- 
coming the most popular new-genera- 
tion microprocessor used in high per- 
formance desktop or personal com- 
puters. Several manufacturers have an- 
nounced systems using the MC68000, 
with costs ranging from $5,000 to 
$10,000, depending on the amount of 
memory and size and type of disk 
storage. These systems pack the power 
of a minicomputer into a personal 
computer-size package and price. 

The main reason for this favorable 
performance/price ratio is the advanced 
micro-programmed architecture of the 
MC68000. Its 16-bit external data bus 
and 32-bit internal registers allow high 
throughput. A 23-bit external address 
bus, plus upper and lower data strobe, 
allows direct addressing of 16 mega- 
bytes of memory. The powerful in- 
struction set was designed to allow 
easier implementation of structured 
high-level languages, such as Pascal 
and C. Operating systems are also sup- 
ported by the basic architecture, with 
features such as: 



• supervisor and user states of operation 

• privileged supervisor instructions 



• separate supervisor stack pointer 

• vectored, multilevel, priority inter- 
rupt handling 

• TRAP vectors to handle a variety of 
error conditions and operating sys- 
tem calls 

Data types include bit, byte, word, long 
word, and BCD digits. The machine 
has 17 32-bit registers. Sixteen of these 
are accessible in user state (8 address 
registers and 8 data registers). The re- 
maining register is the supervisor stack 
pointer and is only accessible when the 
machine is in supervisor state. 

The MC68000 was designed to take 
advantage of the latest technology in 
VLSI semiconductor manufacturing. 
Likewise, the recent advances in com- 
puter science have also influenced the 
design of the CPU and the instruction 
set of the MC68000. The LINK and 
UNLK instructions make it easy to 
allocate and deallocate space dynamic- 
ally on the system stack. This is 
especially useful when setting up local 
variables in a procedure. Another in- 
struction, CHK, aids the implementa- 
tion of high-level languages. CHK 
allows the checking of array bounds 
with a single instruction by comparing 
the value of a register specified with 
zero and an upper limit. 

The instruction set is quite regular, 
in that most instructions use the same 
addressing modes and can operate on 
most data types. All op codes are 16 
bits in length. Additional information 
necessary for specific instructions and 
addressing modes may require one to 
four additional words to contain im- 
mediate data, displacement offsets, or 
absolute addresses. 

The basic instruction types are: data 
movement operations; integer arith- 
metic; logical operations; shift opera- 
tions; bit manipulation (bit addressable 
test, set, clear); BCD arithmetic; and 



program control and system control 
operations. The complete instruction 
set is shown in tables 1 and 2. 

The addressing modes of the 
MC68000 are of six basic types: register 
direct, register indirect, absolute, im- 
mediate, program counter relative, and 
implied. Add to these basic types the 
ability to do indexing, post-incre- 
menting, and pre-decrementing, and 
you have 14 specific addressing modes 
(as shown in table 3). 



Registers 

The 17 data and address registers 
free the programmer from the overhead 
of a complicated register management 
scheme in the majority of applications. 
Eight of the registers (DO through D7) 
are data registers and may be used for 
byte, word, and long word operations. 
The remaining 8 (A0 through A7) are 
user-accessible address registers. The 
address registers and the supervisor 
system stack pointer may be used for 
word and long word address operations. 
All of the 17 registers may be used as 
index registers. All allow post- incre- 
menting and pre-decrementing, giving 
the programmer the ability to use any 
of them as a user stack pointer. 

The other registers on the MC68000 
are a 16-bit status register and a 32-bit 
program counter. The registers are 
summarized in the programming 
model in table 4 . 



Data Registers 

Each of the eight data registers 
(D0-D7) is 32 bits wide. Data registers 
are further subdivided into word (16 
bits) and byte (8 bits) lengths for data 
manipulation. Long word operands, of 
course, occupy the entire register. 
Word operands occupy the low order 16 
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bits, and bytes occupy the low order 8 
bits. When data registers are used as 
either a source or destination operand 
in an instruction, only the appropriate 



Table 1: Instruction SET 


Mnemonic 


Description 


ABCD 


Add Decimal with Extend 


ADD 


Add 


AND 


Logical And 


ASL 


Arithmetic Shift Left 


ASR 


Arithmetic Shift Right 


Bcc 


Branch Conditional 


BCHG 


Bit Test and Change 


BCLR 


Bit Test and Clear 


BRA 


Branch Always 


BSET 


Bit Test and Set 


BSR 


Branch to Subroutine 


BTST 


Bit Test 


CHK 


Check Register Against 




Bounds 


CLR 


Clear Operand 


CMP 


Compare 


DBcc 


Test Condition, Decrement 




and Branch 


DIVS 


Signed Divide 


D1VU 


Unsigned Divide 


EOR 


Exclusive OR 


EXG 


Exchange Registers 


EXT 


Sign Extend 


JMP 


Jump 


JSR 


Jump to Subroutine 


LEA 


Load Effective Address 


LINK 


Link Stack 


LSL 


Logical Shift Left 


LSR 


Logical Shift Right 


MOVE 


Move 


MOVEM 


Move Multiple Registers 


MOVEP 


Move Peripheral Data 


MULS 


Signed Multiply 


MULU 


Unsigned Multiply 


NBCD 


Negate Decimal with 




Extend 


NEG 


Negate 


NOP 


No Operation 


NO 


Ones Complement 


OR 


Logical OR 


PEA 


Push Effective Address 


RESET 


Reset External Devices 


ROL 


Rotate Left without Extend 


ROR 


Rotate Right without 




Extend 


ROXL 


Rotate Left with Extend 


ROXR 


Rotate Right with Extend 


RTE 


Return from Exception 


RTR 


Return and Restore 


RTS 


Return from Subroutine 


SBCD 


Subtract Decimal with 




Extend 


Sec 


Set Conditonal 


STOP 


Stop 


SUB 


Subtract 


SWAP 


Swap Data Register Halves 


TAS 


Test and Set Operand 


TRAP 


Trap 


TRAPV 


Trap on Overflow 


TST 


Test 


UNLK 


Unlink 



portion of the register is used or changed; 
the remaining portion is left undisturbed. 

Address Registers 

Each address register and the stack 
pointers are also 32 bits wide. The ad- 
dress registers may also be used for 
word operands, but, unlike the data 
registers, may not be used for byte 
operands. Word operands are contained 
in the low order 16 bits of an address 
register. When an address register is 
used as a source operand, either the en- 
tire register or the low order 16 bits will 
be used, depending on whether it is a 
long word or word operation. If an ad- 
dress register is specified as a destina- 
tion operand, the entire register is af- 
fected. Long word operations will of 
course write the 32-bit value into the 
entire 32-bit register. Word operations 
will cause sign extension on any other 
operands before the operation takes 
place. 

The system stack pointers (A7 in 
user and supervisor state) are used by 
the machine for interrupt, subroutine 
call, and trap processing. The two stack 
pointers are both accessed by using A7 
in the operand field of an instruction. 
The supervisor stack will be accessed if 
the MC68000 is in supervisor state and 
the user stack pointer will be used if it 
is not in supervisor state. The user may 
also use the system stack to store tem- 
porary data by pushing and pulling data 
via the MOVE instruction, or by using 
the LINK and UNLK instructions 
described later. 



Program Counter 

The program counter of the 
MC68000 is a full 32 bits in length, 
even though the range of the address 
space is only 24 bits (23 bits plus upper 
and lower data strobe) on the current 
version. Future versions will have 32 
bits of address space. The program 
counter is manipulated .by program 
control-type instructions (branches, 
subroutine calls, etc.). The program 
counter is also used as the base address 
in program counter relative address 
calculations. 



Status Register 

The status register on the MC68000 
is 16 bits long. It is broken up into an 
8-bit system status byte and an 8-bit 
condition code byte. The system status 



byte contains an eight-level interrupt 
mask and additional processor-related 
status bits. These status bits indicate 
whether or not the MC68000 is in trace 
state and/or supervisor state. The con- 
dition code byte contains bits for 
overflow (V), zero result (Z), negative 
result (N), carry (C), and extend (X). 
The status word has six unimple- 
mented bits reserved for future exten- 
sions to the MC68000 family. 



Instruction Set Description 

In this section we will discuss the 
MC68000 instruction set in moderate 
detail. There are several variations of 
some instructions, which make them 
shorter (and/or faster), allow 
manipulation of pointers, and 
flexible immediate addressing, 
programmer may explicitly choose 
these variations or allow the Motorola 
Resident Structured Assembler to 
select the appropriate form of the in- 
struction. These variations include 
"quick", "immediate", and "address" 
instruction types, designated by "Q", 
"I", and "A" suffixes to the instruc- 
tion mnemonic. 



easy 

more 

The 



Data Movement Operations 

Unlike the MC680O/6809 architec- 
tures, the MC68000 does not have 
specific load and store register opera- 
tions containing explicit register 
reference. Instead, a more powerful 
MOVE instruction is provided to per- 
form data transfers. The source and 
destination of data transfer operations 
are specified independently of the in- 
struction. This allows movement of 
data between registers, from register to 
memory, from memory to register, and 
from memory to memory. Data MOVE 
instructions allow byte, word, and long 
word operands. Address MOVE instruc- 
tions allow only word and long word 
operands. This insures that only legal 
address manipulations can be executed. 



The MC68000 also includes several 
special MOVE instructions. The 
MOVE Multiple register instruction 
(MOVEM) allows several registers to be 
moved to or from memory with one in- 
struction. The MOVE Peripheral data 
instruction (MOVEP) provides a means 
to transfer word and long word data to 
or from peripheral data registers, which 
are located at alternate addresses in 
memory space. The EXchanGe regis- 
ters instruction (EXG) allows the swap- 
ping of contents between any pair of 
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the accessible registers. Load Effective 
Address (LEA) and Push Effective Ad- 
dress (PEA) provide means for manipu- 
lating address pointers in position- 
independent programs by loading the 
effective address of a variable into an 
address register or pushing it onto a 
stack. LINK stack (LINK! and UNLinK 
stack (UNLK) instructions allow the 
user to easily reserve and return tem- 
porary variable space on a stack. The 
MOVE Quick instruction (MOVEQ) 
makes it easy to transfer sign-extended 
8-bit immediate data to a register with 
a very fast one-word instruction. 



Integer Arithmetic Operations 

The four basic arithmetic functions 
of add, subtract, integer multiply, and 
integer divide are supported by the 
MC68000, along with other useful 
operations such as compare operand, 
negate operand, test operand, and clear 
operand. 

The ADD and SUB operations are 
available for both address and data 
operations. Data operations allow all 
sizes of operands. Address operations 
are restricted to legal address size 
operands [long word and word). The 
arithmetic CoMPare instruction (CMP) 
can be used on data, address, and 
memory compare operations. The 
NEGate (NEG) and CLeaR (CLR) in- 
struction can be used on all sizes of 
data operations (byte, word, and long 
word) . The multiply instruction is used 
to multiply two word operands to form 
a long word result. MULU is used for 
unsigned multiplication and MULS for 
signed multiplication. 

In division, a long word dividend is 
divided by a word divisor to produce a 
word quotient with a word remainder. 
Again, instructions are provided for 
signed and unsigned operations (DIVS 
and DIVU). A set of extended arith- 
metic instructions is also available for 
programming multiprecision and mixed 
size arithmetic functions. These in- 
clude ADDX, SUBX, NEGX, and EXT 
(sign extend). The test instruction 
(TST) is used to set the condition codes 
as a result comparing the operand to 
the value zero. 

Another powerful instruction in this 
category is the Test And Set instruction 
(TAS). TAS sets the N and Z condition 
codes based on a compare of the byte 
operand specified in the instruction 
with zero. The most significant bit 



(sign bit] of the byte is then set before 
the instruction is completed. This is 
very useful for manipulation of sema- 
phores between processes, since the test 
and set operation is uninterruptable. 

Immediate data of byte, word, and 
long word length may be added to or 
subtracted from the data stored at the 
effective address using the add and sub- 
tract immediate instructions (ADDI 
andSUBI). 

A variation of the add and subtract 
immediate instructions are "quick" 
add and subtract (ADDQ and SUBQ). 
These instructions allow the addition 
or subtraction of immediate data (in 
the range one to eight) to byte, word, or 
long word operands. The advantage of 
these instructions are speed and com- 
pactness. They are particularly useful 
in loops where loop counts must be 
altered by some small value other than 
one, but less than nine each time 



through the loop. 

Binary Coded Decimal (BCD) arid 
metic operations are also supported b 
the MC68000. The following multipn 
cision BCD arithmetic functions ma 
be performed: add decimal with exten 
(ABCD), subtract decimal with exten 
(SBCD), and negate decimal with ei 
tend (NBCD). The BCD arithmeti 
operations are restricted to byte-lengt 
operands and can be register-to-registe 
or memory-to-memory operations. 

Logical Operations 

The MC68000 provides a full set c 
logical operation instructions. Logics 
and (AND), inclusive or (OR), es 
elusive or (EOR), and logical compk 
ment (NOT) are available for all sizes c 
integer data operands. In addition, a se 
of immediate instructions, ANDI, OR] 
and EORI provide logical operations 01 
all operand sizes. 



Table 2: Instruction Variations 



Instruction 






Type 


Variation 


Description 


ADD 


ADD 


Add 




ADDA 


Add Address 




ADDQ 


Add Quick 




ADDI 


Add Immediate 




ADDX 


Add with Extend 


AND 


AND 


Logical AND 




ANDI 


AND Immediate 




ANDI to CCR 


AND Immediate to Condition Code 




ANDI to SR 


AND Immediate to Status Register 


CMP 


CMP 


Compare 




CMPA 


Compare Address 




CMPM 


Compare Memory 




CMPI 


Compare Immediate 


EOR 


EOR 


Exclusive OR 




EORI 


Exclusive OR Immediate 




EORI to CCR 


Exclusive Immediate to Condition Codes 




EORI to SR 


Exclusive OR Immediate to Status Register 


MOVE 


MOVE 


Move 




MOVEA 


Move Address 




MOVEQ 


Move Quick 




MOVE to CCR 


Move to Condition Codes 




MOVE to SR 


Move to Status Register 




MOVE from SR 


Move from Status Register 




MOVE to USP 


Move to User Stack Pointer 


NEG 


NEG 


Negate 




NEGX 


Negate with Extend 


OR 


OR 


Logical OR 




ORI 


OR Immediate 




ORI to CCR 


OR Immediate to Condition Codes 




ORI to SR 


OR Immediate to Status Register 


SUB 


SUB 


Subtract 




SUBA 


Subtract Address 




SUBI 


Subtract Immediate 




SUBQ 


Subtract Quick 




SUBX 


Subtract with Extend 
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Shift and Rotate Operations 

Bidirectional arithmetic and logical 
shift operations are performed in the 
MC68000 by executing the ASR, ASL, 
LSR, and LSL instructions. Rotate oper- 
ations may be performed with the ROR, 
ROL, ROXR, and ROXL instructions. 

Arithmetic shift operations shift the 
operand in the direction specified. The 
last bit shifted out of the operand will 
be contained in the carry (C) bit and the 
extend (X) bit of the Condition Code 
Register (CCR). When the operand is 
shifted right, the value of the sign bit of 
the operand (Most Significant Bit) will 
be preserved., During left shift opera- 
tions, the Least Significant Bit of the 
operand will be replaced by zero (0). 
The overflow (VJ bit will indicate if the 
sign of the operand has changed during 
the left shift operation. 

Logical shift operations shift the 
operand either right or left as specified 
by the instruction. The last bit shifted 
out of the operand in either direction 
will be contained in the C and X condi- 



tion code bits. Zeros are shifted into the 
MSB during right shifts, and into the 
LSB during left shift operations. 

Rotate operations (ROR and ROL) 
rotate only the bits in the operand and 
do not include the contents of the ex- 
tend (X) bit. The operand is rotated in 
the direction specified by the instruc- 
tion, and the last bit rotated will also be 
contained in the carry (C) bit. The con- 
tents of the X bit will never be rotated 
into the operand. 

Extended rotate operations are pro- 
vided by the rotate with extend instruc- 
tions (ROXR and ROXL), which in- 
clude the extend (X) bit in the opera- 
tion. During these operations, the 
previous contents of the X bit will be 
shifted into the MSB or LSB, depending 
on the direction of the rotate operation. 
Multiple precision shifts and rotates 
can be performed using a combination 
of shift and extended rotate operations. 

All shift and rotate operations may 
be performed on memory or registers. 
When a register is specified as the effec- 



Table 3: Addressing Modes 


Mode 


Generation 


Register Direct Addressing 




Data Register Direct 


EA - Dn 


Address Register Direct 


EA = An 


Absolute Data Addressing 




Absolute Short 


EA = (Next Word) 


Absolute Long 


EA = (Next Two Words) 


Program Counter Relative Addressing 




Relative with Offset 


EA = (PC) + d,« 


Relative with Index and Offset 


EA = (PC) + (Xn) + d„ 


Register Indirect Addressing 




Register Indirect 


EA = (An) 


Postincrement Register Indirect 


EA = (An), An — An + N 


Predecrement Register Indirect 


An — An - N, EA = (An) 


Register Indirect with Offset 


EA = (An) + d„ 


Indexed Register Indirect with Offset 


EA = (An) + (Xn) + d„ 


Immediate Data Addressing 




Immediate 


DATA = Next Word(s| 


Quick Immediate 


Inherent Data 


Implied Addressing 




Implied Register 


EA = SR, USP, SP, PC 


Notes: 




EA = Effective Address 




An = Address Register 




Dn = Data Register 




Xn = Address or Data Register used as Index Register 


SR = Status Register 




PC = Program Counter 




j | = Contents of 




d, = 8-bit Offset (displacement] 




d 16 = 16-bit Offset (displacement) 




N = 1 for Byte, 2 for Words and 4 for Long 


Words 


«- = Replaces 





tive address of the operand, all operand 
sizes are allowed. A shift count of one 
to eight bits may be specified in the in- 
struction, or a count of zero to 63 bits 
may be specified in a data register. 

Shifts and rotates on memory oper- 
ands can only be single bit shifts and 
are restricted to word length operands. 

Bit Manipulation Operations 

Several powerful bit manipulation 
instructions have been implemented in 
the MC68000. Individual bits may be 
tested (BTST|, tested and set (BSET), 
tested and cleared (BCLR), or tested 
and toggled (BCHG). The BTST in- 
struction causes the state of the speci- 
fied bit in the operand to be reflected by 
the zero (Z) bit in the condition code 
register. The BSET and BCLR instruc- 
tions allow the state of the specified bit 
to be reflected by the Z bit, and in addi- 
tion, set or clear the specified bit after 
the test. The BCHG instruction causes 
the state of the bit to be reflected in the 
Z bit, and also changes the state of the 
specified bit in the operand to the op- 
posite state after the test. 

Bit manipulation operations may be 
performed on register or memory oper- 
ands. If the effective address is speci- 
fied as a register, the bit number speci- 
fication is modulo 32, allowing all bits 
contained in the register to specified. 
Memory operands are restricted to byte 
length and the bit number specification 
is modulo 8. The bit number is 
specified as part of the instruction, or 
in a data register specified in the 
instruction. 



Program Control Operations 

Program execution in the MC68000 
is controlled by the Program Counter 
(PC). The PC is updated in the normal 
processing of an instruction to point to 
the next instruction to be executed. 
The PC will either point to the next se- 
quential instruction in memory, or to 
another instruction sequence else- 
where in memory as a result of a PC 
modifying instruction. 

The program counter is modified by 
the execution of an instruction in one 
of two ways. In the first way, the PC is 
modified by adding a displacement, 
specified in the instruction, to the cur- 
rent PC to get the address of the next 
instruction to be executed. The dis- 
placement (word or byte) specified in 
relative branch instructions is a two's 
complement integer value, which 
counts the relative distance in bytes. 
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The value of the PC is the address of 
the current instruction, plus two. The 
displacement is calculated by the 
assembler when the program is assem- 
bled, or by the linker when building a 
load module. By adding displacements 
to the current PC, the program will be 
position independent, since all PC 
changes are relative and control is 
always resumed at the same location in 
the program instead of an absolute 
memory address. This allows programs 
to execute anywhere in memory in- 
stead of from a specific area. 

In the second way, the PC may be 
modified by instructions that load an 
effective address value into the PC 
when the instruction is executed. In 
this case, the value of the PC will be 
overwritten by the new address speci- 
fied in the instruction. When these in- 
structions are executed, control will be 
transferred to the memory address 
specified regardless of where the pro- 
gram is loaded. 

Program control operations are ac- 
complished with a collection of branch 
instructions, subroutine branches, and 
return instructions. Branch instruc- 
tions can be conditional or uncondi- 
tional. The conditional branches allow 
testing various condition bits in the 
condition code register individually or 
in Boolean combination. If the condi- 
tion specified in the branch instruction 
is met, the branch will be taken. If not, 
the next sequential instruction will be 
executed. The conditional branch in- 
struction (Bcc) tests the condition 
specified in the instruction. Then it 
either branches or falls through to the 
next instruction, based on whether the 
condition is met or not. The test condi- 
tion, decrement and branch instruction 
(DBcc), tests the specified condition 



Table 4: Programmer's Model 
for the MC68000 



- 




1 i 




DO 
D1 








~ 


D2 








- 


D3 Eight 








D4 Data 


"" 








C5 Registers 








~ 


D6 








"~ 


D7 


31 




16 15 







_ 




t 




A0 


„ 




I 




At 


_ 




1 


— 


A2 Seven 






1 




A3 Address 


- 




1 


- 


A4 Registers 
A5 


" 








A6 










Two Stack 
Pointers 




Use 


Stack Pointer 






Supervisor Slack Pointer 




31 





























15 8 7 









[System Byte Use 


Byte 


Register 



and falls through if it is true. If the con- 
dition is not true, the contents of a 
specified register is decremented and 
the result compared to - 1 . If the value 
is not - 1, the branch will be taken. 
Otherwise control will resume with 
the instruction following the DBcc. All 
conditional branches are relative to the 
current PC. Table 6 lists the conditions 
that can be tested by the conditional 
branch instruction. 

Unconditional branch instructions 
always force the destination address of 
the branch to be loaded into the pro- 
gram counter. These branches may be 
relative to the current PC or absolute 
addresses. The BRAnch unconditional 
instruction (BRA) will always cause the 
PC to be replaced by the value of the 
current PC, plus the relative displace- 
ment specified in the instruction. The 
JuMP instruction (JMP) causes the PC 
to be loaded with the effective address 
specified in the JuMP instruction. 

There are also two subroutine call 
instructions. These instructions first 
save the value of the current PC (ad- 
dress of next sequential instruction to 
be executed) on the system stack 
(pointed to by address register A7), and 
then cause the PC to be loaded with the 
address of the subroutine to be ex- 
ecuted. The Branch to SubRoutine 
(BSR) instruction causes the relative 
offset specified in the instruction to be 
added to the PC. The Jump to Sub- 
Routine instruction (JSR) loads the PC 
with the effective address of the sub- 
routine specified by the effective ad- 
dress specified by the JSR instruction. 

There are two instructions that 
return program control to the address 
stored on the system stack. ReTurn 
from Subroutine (RTS) pulls the new 
program counter value from the stack 
and program execution resumes at that 
address. The ReTurn and Restore in- 
struction (RTR) additionally restores 
the condition code register from the 
stack when returning from interrupt 
processing. 

Bcc and BSR can have displacement 
values of byte and word lengths. DBcc 
always has a word length displacement 
value. The effective address used by the 
JMP and JSR instructions is specified by 
the addressing mode of the instruction. 

Another instruction that uses the 
condition codes is the Set according to 
condition (Sec). The Sec instruction 
tests the specified condition (see table 6) 
and sets the byte specified by the effec- 
tive address to all ones if the condition 
is true. Otherwise the byte is cleared. 



System Control Operations 

Several instructions offer easy im- 
plementation of system control func- 
tions. These instructions allow logical 
operations on the status and condition 
code bits, trap and exception process- 
ing, special range checking, special pro- 
gram flow control operations, and even 
a special peripheral reset operation. 

Many of these can be used only if 
the MC68000 is in the supervisor mode 
(S bit in the system byte of the Status 
Register set) to support the operating 
system environment. These privileged 
instructions include those that change 
the state of bits in the system byte of 
the status register (ANDI, EORI, ORI, 
and MOVE EA to SR), change the value 
of the User Stack Pointer (MOVE USP), 
ReTurn from Exception trap (RTE), 
stop program execution (STOP), and 
cause the RESET pin to become an out- 
put and be asserted (RESET). 

Instructions that directly change 
the contents of the Condition Code 
Register portion of the status register 
(ANDI, EORI, ORI, and MOVE EA to 
CCR) and store the status register 
(MOVE SR to EA) may be executed in 
user mode also. 

The user program may also execute 
intructions that might generate a trap. 
These are: the range checking instruc- 
tion (CHK); the specific trap generation 
to one of 16 trap vectors (TRAP); and 
causing a trap on overflow bit set in the 
condition code register (TRAPV). 



Addressing Modes 

The MC68O0O's 14 addressing 
modes can be grouped into three broad 
classes. These are: 1. Register District, 
2. Memory, and 3. Inherent addressing. 

Register Direct Addressing Modes 

In Register Direct addressing, the ef- 
fective address is one of the 16 
registers. Register addressing can be 
divided into these two categories: 1. 
Data Register Direct — Dn; 2. Address 
Register Direct — An. The notation for 
Data Register Direct addressing is 
"Dn" (e.g., DO refers to data register 
0). Likewise, Address Register Direct 
addressing notation is "An". 

Memory Addressing Modes 

Unlike Register Direct addressing, 
Memory addressing modes provide the 



36 



MICRO - The 6502/6809 Journal 



No. 52 - September 1982 



68000 FEATURE! 



address of an operand that is in 
memory. A list of Memory addressing 
modes for the MC68000 follows. 
Beneath each of the Memory address- 
ing modes is an example of its assem- 
bler syntax. All indirect references are 
placed in parentheses. 

1 . Indirect Addressing 

a. Address Register Indirect 

(An] 

b. Address Register Indirect with 
Postincrement 

(An) + 

c. Address Register Indirect with 
Predecrement 

-[An) 

d. Address Register Indirect with 
Displacement 

disp|An| 

e. Address Register Indirect with 
Index 

disp(An + Im. W) where Im is Am 
or Dm 

disp(An + Im. L] where Im is Am 
or Dm 

2. Absolute Addressing 

a. Absolute Short 
inst.W ADDRESS 



Table 5: MC68000 Status Register 



Condition 
Codes 



Trace Mode 

Supervisor ^ 

State / 

Interrupt ^ 

Mask/ 

(Extend 
Negative 
Zero 
Overflow 
Carry 



b. Absolute Long 
inst.L ADDRESS 



System Byte 




b. Program Counter With Index 
disp(PC + In| where In is An or Dn 



4. Immediate Addressing 

3. Program Counter Relative Addressing a. Immediate 

a. Program Counter with #xxx 

Displacement b. Quick Immediate 

disp(PC) #xxx 



(continued) 




X 




PET/CBM 

2000/3000/4000 Series 
not using a CRT, or display controller chip 

$275.00* 



Select either 
BO x 25 op 40 x 25 



On The 
Built-in 
Display 



From the keyboard or program 

Displays the full, original character set 

Available from your local dealer or: 
EXECOM CORP. 

1901 Polaris Ave. 
Racine, Wl 53AOA 
Ph. 41 4-632-1 004 

♦ Plus installation charge of $"75.00 



Available only for Basic 3.0 S Basic A.O 

PETS CBM™a 

trademark of Commodore Business Machines 



SOUTHEASTERN MICRO SYSTEMS, INC. 

1080 IRIS DRIVE 

CONYERS, GEORGIA 30207 

404-922-1620 

SX-9 
Single Board System 

■ Uses 6600 CPU 

■ Two R3232 Serial Ports 

• Two Parallel 6 Bit Ports 

- One High-Speed Serial Port 

• System Clock at 1.22 MHZ, Fixed 

■ System provides for selectable diagnostics on power up or by 

command 

■ Provides for automatic disk boot on power up 

■ Provides for board ID for future multi-user configuration or user 

defined 

■ Expansion capabilities via ribbon cable 

• Disk controller provides control fcr up to four 5 1/4" drives from 

SS/SD up to DS/DD control 

• Real time clock 

• Memory 64K RAM (62K User Memory) 

• All signals via plug in ribbon connectors 

• Compatible with TSC FLEX 9 and all TSC 6809 single user software. 

DS/DD requires SEMS-1 Disk Drivers 

• Board size: 10.25" by 10.5' 

■ Power requirements: t5 VDC at 3 AMPS, r 1 2 VDC at 250 ma, 

-12 VDC at 100 ma 

■ Optional Cabinet with Power Supply 



LIMITED OFFER 

Bare Board With SEMS-1 
Monitor & Documentation 



ONLY 100 Bare Boards 

Will Be Soldi 

ORDER NOW! 

First order basis 



PRICES 

ASSEMBLED & TESTED 



BOARD WITH CABINET $1295 00 

& POWER SUPPLY 



SOFTWARE: TSC FLEX 9 
With SEMS Disk Drivers 
(with Editor & Assembler) 



US SHIPPING 110.00, FOREIGN SHIPPING $50.00 
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MICRObits 

(Continued from page 29) 

AIM 65 — Real Time Clock 

Provides hour, minute, second, day of 
week, day, month, year. Twelve- or 
24-hour format. Pin compatible with 
AIM expansion connector (also SYM, 
KIM) . Four switch selectable 
interrupts. Nicad battery backup. 
Industrial quality board 4.5 x 6. All 
ICs socketed. Single 5V supply. 
Twenty-two-page manual. All 
software included. Bare board $29. 
Complete A&T $93, includes 
batteries. Add $4- shipping and 
handling, CA residents add 6%. 

Data Design Group 

7100 Mimosa Drive 

Carlsbad, CA 92008 

(714)265-6940 



The Wrath of Khan 

Can you defeat a Superman? 
Command Enterprise in a tactical 
battle against the Reliant. Cl-P 
controls Reliant's maneuvers and 
weapons via Artificial Intelligence 
logic routines. Features full status 
display, sensors, photon torpedoes, 
phasers, deflectors, and more. 
Cassette 8K - $14.95 ppd. 

Cygnus Software 

Suite 432. 

Ft. Lauderdale, FL 33311 



Perseus Programming for OSl 

Boxed In — An adventure in which 
you must escape to become a member 
of the CIA. Rookie Mission — - Your 
first mission as an agent and you 
must find the traitor! Suicide Mission 
— An exciting graphics game that pits 
you against an alien who has captured 
your crew, and you must retrieve 
them against over- whelming odds. 
Tough! All programs run in 8K and on 
a C1P, C2P, C2-4P, or C8P with a 
cassette-based system. Send $9.95 for 
each or $22.95 for all. 

Perseus Programming 

9311 Avery Rd. 

Broadview Heights, OH 44147 



OSl States and Capitals Drill 

Let your kids use the computer and 
learn at the same time! You won't 
believe this program is running on 
your 8K C1P! Graphics, screen clears, 
no scrolling, and it even gives you a 
grade. Get a correct answer and watch 
the flag wave. Cassette - $10.95 plus 
$1.50 for postage. Math drill games 
also available- 
Tripod Productions 
Rt. 11, Box 71 
Bowling Green, KY 42101 

{Continued on page 98) 



Table 6: Condition Codes Allowed for the DBcc, Sec, and Bcc Instructions. 



cc 


Carry Clear 


LS 


Lower or Same 


cs 


Carry Set 


LT 


Less Than 


EQ 


Equal 


MI 


Minus 


F 


False * 


NE 


Not Equal 


GE 


Greater or Equal 


PL 


Plus 


GT 


Greater Than 


T 


True 


HI 


Higher 


VC 


Overflow Clear 


LE 


Less or Equal 


VS 


Overflow Set 



The false condition does not apply to Bcc. 



The various forms of Address Regis- 
ter Indirect addressing provide great 
flexibility. In the simplest of these, the 
effective address is the contents of the 
specified address register. In the Post- 
increment mode, the effective address 
is still the specified address register but 
the address register will be incre- 
mented after the operation. The Pre- 
decrement mode is the same except the 
address register is decremented before 
the operation. The Pre-decrement and 
Post-increment modes automatically 
adjust the number of words to decre- 
ment or increment based on the size of 
the operation. For the Address Register 
Indirect with Displacement mode, the 
effective address is formed by summing 
the contents of the specified address 
register with a sign-extended 1 6-bit off- 
set. The Address Register Indirect with 
Index effective address is the contents 
of the specified address register, summed 
with the sign extended 8-bit displace- 
ment and the specified index register. 
The index register can be any of the ad- 
dress or data registers and can be 
specified as either a long word or a word 
(which will be sign extended). The ex- 
ecution speed of the Address Register 
with Index is not affected by the size of 
the index. 

In the Absolute Addressing modes, 
the effective address is specified in the 
word or words following the opcode. In 
the case of Absolute Short addressing, 
the word is sign-extended to form the 
effective address. 

The Program Counter addressing 
modes use the contents of the program 
counter to form an effective address. 
These modes are important for writing 
position- independent code. The Pro- 
gram Counter with Displacement mode 
sums the contents of the program 
counter with a 16-bit sign-extended 
displacement just like Address Register 
Indirect with Displacement. The Pro- 
gram Counter with Index mode is iden- 
tical to Address Register Indirect with 



Index, except that the program counter 
is used instead of an address register. 

For normal immediate addressing, 
the effective address is the word or long 
word immediately following the op- 
code, depending on the size of the 
operation. Single bytes are stored as a 
word (the upper byte is zeros] . In Quick 
Immediate addressing, a special case of 
immediate addressing, the immediate 
data (a number from 1 to 8) is contained 
in a 3-bit field in the opcode. Quick Im- 
mediate addressing is available for 
ADD and SUB instructions where con- 
stants are used frequently. Immediate 
addressing limits the destination ad- 
dressing mode to register direct. 
However, many special immediate in- 
struction variants exist, such as ADDI, 
for using memory addressing for the 
destination address. 

Implicit Addressing 

Many instructions make implicit 
references to the program counter, the 
supervisor stack pointer, the user stack 
pointer, or the status register. For ex- 
ample, the RTS (return from sub- 
routine) implies use of the program 
counter and the stack pointer. 

Using the MC68000 

In the second part, we hope to pro- 
vide a better feel for using the MC68000 
through a series of simple examples, In 
addition to showing assembler syntax, 
these examples will illustrate instruc- 
tions such as LINK, UNLK, and CHK 
which may be unfamiliar. 



Joe Jelemensky and Tom Whiteside are 
engineers in the Motorola MOS 
Microprocessor Design Group. They can 
be contacted at Motorola, Inc., Mail Drop 
M2880, 3501 Ed Bluestein Blvd., Austin, 
Texas 78721. 
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GET FREE SOFTWARE FOR YOUR COMPUTER! 

HOW? JUST ORDER ANY OF THE ITEMS BELOW, AND SELECT YOUR FREE SOFTWARE FROM THE BONUS 
SOFTWARE SECTION, USING THE FOLLOWING RULE: FOR THE FIRST $100.00 WORTH OF MERCHANDISE 
ORDERED TAKE 1 ITEM; FOR THE NEXT $200.00 WORTH OF MERCHANDISE ORDERED TAKE ANOTHER ITEM; 
FOR THE NEXT $300.00 TAKE A THIRD ITEM, ETC. ALL AT NO COST. 



HARDWARE by APPLE COMPUTER 

APPLEII+ 48K 1199 PASCAL 150 

FLOPPY OR + CNTRLR 545 FLOPPY DRIVE 465 

APPLE III. 128K 2999 PILOT 125 

We carry the rest of the APPLE line at low low prices 1 CALL 1 



OTHER HARDWARE for APPLE 

O.C.HAYES: 

Micromodeml! 



285 Smartmodem 



MICROSOFT: 

Z80Softcatd 



269 



l6KRamcard 



MOUNTAIN COMPUTER: 

ExpansionChassis 559 MusicSystem 

A/0 + D/ACard 299 CPS Multi-function 

X/ 10 Control Card 169 SuperTalker 

CALL FOR MORE PRICES 1 WE CARRY FULL LINE' 
CALIFORNIA COMPUTER SYSTEMS: 
Centronics Par Int 115 A/DConverler 

Async Serial Int 135 Calendar/Clock 

CALL FOR MORE PRICES 1 WE CARRY FULL LINE 1 
VIOEX: 

aOCol Bd SSottswitch 235 Enhancerl 
Enhancer I 105 Sottswitch 

MORE OTHER HARDWARE FOR APPLE: 



SSMAIO-II 
SSM Serial ASIO 
SSMPar AP10 
Novation Apple Cat 
Versawriter Tablet 
Prac Penph Microbuff 
(32K) 



195 
115 
99 
319 
249 

249 



Keybd Co Num Keypad 
Sunshine Joystick 
Game Paddles 
Shadow /Vet 
SUP'R'MOD 
Prac Penph Microbuff 
(16K) 



225 



339 
169 
169 



105 
101 



125 
29 

129 
39 
29 

885 
29 

210 



OTHER SOFTWARE for APPLE: 

PERSONAL SOFTWARE/VISICORP: 

Visicalc 3 3 195 Visililes 

CALL FOR MORE PRICES' WE CARRY FULL LINE' 

MICROSOFT: 



APPLE Fortran (Z80) 129 

TASC Basic Compiler 139 

TIME Manager 125 

ALDS 99 
MICRO-PRO: 

Wordstar 225 

Spellstar 149 

Super- Sort 149 
PEACHTREE: BIZ Packages, all 
CPA BIZ Packages, all 



APPLEC0D0KZ8O] 

MBASICCompiler(Z80l 

MuMalh 

M/SORT 

Mail-Merge 

Data-Star 

Calc-Star 



199 



499 
299 
199 
149 

99 
199 
149 

199 
195 



MORE OTHER SOFTWARE for APPLE: 



OB Master 
Data Factory 5 
ASCII Express 
SorcimSuperCalc 
Howard Tax Prep 



179 
239 

55 
189 

115 



Howard Real Estate Anal 129 



DBMasterforCORVUS 399 

PFS 85 

Dakm5 0eprec Planner 299 

Dakm 5 BIZ Bookkeeper 299 

Broderbund Payroll 325 

BPI Accounting Pkgs/ea 325 



Synergistic "Data Reporter Manages Pfols& Edits Data 1 189 



WORO-PROCESSORS & SPELLERS for APPLE. 



WordstarCP/M 
MagicWandCP/M 
Executive Secretary 
Letter Perfect 
Magic Window 
Spellguard 
WordHandler(Gives8 



225 
299 
199 
125 
85 
219 



EZWriterProl Sys 
MUSESuperText8' 
Word power 
Hebrew II 
Screenwriter II 
SpellstarCP/M 



-Col SLower-Casewithnoboard' 



215 
150 
50 
55 
110 
149 
199 



PRINTERS 



EPSON: 

MX80 

MXIOOw/Graftrax 

APPLE Intfce/Cbl 

GRAPPLERInltc 

MX80 Ribbon 

C ITOH: 

F-IODaisyWheel(Par) 

Pro-Writer(Par/Ser) 

F- lOTractor Option 

NEC: 

PC-8023A 

QUME: 

SPRINT9/45 

OKIOATA: 

Microline82A 

MicrolineTractor 

Microline83A 

IOS: 

560withgraphics 

Prism 80(Basic) 

Auto Sheet Feed 

Sprint Mode(200cps) 



449 
729 

85 
149 

15 



MX80F/T 

MX70w/Graftrax 

GRAFTRAX 

2K Buffer Serial Card 

MX100 Ribbon 



549 
285 

60 
135 

24 



1495 F-IODaisyWheel(Ser) 1495 
599 Pro-Writer(Par) 499 

225 Printerlnterfaces CALL 



495 NEC7710Daisy 
OIABLO: 

1995 630 R/0 

495 Microline80 
59 Okigraphl 
799 Microline84(Par) 



2345 

2099 

375 

79 

1099 



1095 Prism-Print Software 49 

899 Prism 132 (Basic) 1050 

125 PrismColor 325 

125 Dot Plot Graphics 85 



ADD-ON MEMORY CARDS & DISK DRIVES 



FOR APPLE 



MEMORY: 

Microsoft 16KRamcard 139 
Legend 128KRamcard 649 
Legend64KRamcard 299 
SVA256KAPL-Cache 1045 
AXLON320K Ram Disk 1149 



Saturn 32K Card 199 

Saturn 64K Card 369 

Saturn 128K Card 525 

Prometheus 128K 439 

16Kof4l16.200NSMem 25 



APPLE-COMPATIBLE FLOPPIES by MICRO-SCI: 



With Controller 

A35 Exact Replacement 460 

A4040-Track 489 

A70 70-Track 599 

8 FLOPPY OISK SYSTEMS: 

VistaOualSSOD 1299 

SVAAMS8000Dual 

SSDD 1945 

SVAZVX4QuadCntrllr 495 
CORVUSHARO DISKS: 
6MBHardDisk 2249 

11 MB Hard Disk 3945 

20MBHardOisk 4769 



No Controller 

A35 Exact Replacement 415 

A4040-Track 399 

A7070-Track 499 

Vista Dual DSDD 1599 
SVA AMS8000 Dual 

DSDD 2595 

SVADisk2 + 2Cntrllr 359 

Apple Interface 175 

Other Computer Intfce CALL 

Mirror Back-Up 675 



MONITORS, PLOTTERS & PERIPHERALS 



MONITORS: 

Zenith 12 "Green 
Amdek 12 "Green 
BMC 12 "Green 
Electrohome RGB Intfce 
PLOTTERS: 
Watanabe1-Pen 
Slrobe Plotter 1 -Pen 
Houston Inst DMP-3 
OTHER PERIPHERALS: 
Scott Shadow/VET 
VotraxType-N'-Talk 
ALF9-Voice Music Bd 
ALF3-VoiceMusicBd 



125 Zenith 13 "Color 359 

135 Amdek 13 "Color 359 

119 BMC12"Color 349 

275 Electrohome RGB 1 3 " Cir 725 

1150 Watanabe6-Pen 1400 

699 StrobelApplelntfce 99 

929 Houstonlnst DMP-4 1185 

885 StreetEchollSvnth 189 

325 ComputerSta Oithertizer269 

155 CompSta Video Camera 375 

199 Comp Stat Both above 599 



COMPUTER SYSTEMS 



ATARI 

ATARI800(16K) 629 

810 Disk Drive 449 

16K Ram Memory 89 

Microsoft Basic 69 
INTEC32KRamMemory 129 

ATARI 800(48K) 739 



ATARI400(16K) 
825 Printer 
850 Interface 
830 Modem 
Telelink Cartridge 
AXL0N128K Ram Disk 
ATARI 400 (48K) 



OSBORNE 

Osborne 1 



1695 PrinterCable 



335 
599 
159 
149 
25 
550 
435 

55 



XEROX 

820-1Systemw/5"Dr 2450 

CP/MOp Sys 159 Wordstar 

SuperCalc 199 DIABLO 630 Printer 

Systems-Plus BIZ SOFTWARE, PER MODULE 

NEC 

Full Line at Low. Low Prices! CALL' 

COMMOOOREVIC 

VIC20Computer 259 VIC 1515Printer 

VIC 1 540 Oisk Drive 499 VIC 1211ASupr-Expndr 59 

VlC1530Dalasette 69 VIC 1 01 1 A RS-232 Port 45 



820-2Systemw/8"Dr 2950 

419 
2099 

CALL 1 



335 



GENERAL CP/M SOFTWARE 



MICROSOFT: 

Basic 80 

Basic Compiler 

Fortran 80 

C000I8O 

Macro 80 

MICROPRO: 

Wordstar 

Mailmerge 

Spellstar 

Oatastar 

ASHTON-TATE: 

dBASEII 

SORCIM: 

SuperCalc 

FOX-GELLER: 

Quickscreen 



275 
299 
339 
499 

139 

275 
89 
165 
239 



Edit80 

MuMath/MuSimp 

MuLisp/MuStar 

M-Sort 

Z-80Sottcard/Apple 

Calcstar 
Supersort 
Custom Notes 



475 dBASEII Guide 



129 dUTIL 



Ouickcode(Writes programs lor dBASEi 
ISA: 



Spellguard 
PEACHTREE: 

Gen Ledger 
Acct Rec 
Acct Pay 
Payroll 

SYSTEMS PLUS 
All Modules 



219 SP/LAW 



399/40 
399/40 
399/40 
399/40 

415/EA 



Inventory 
Magicalc 
Sales Invoicing 



139 
199 
159 
128 
269 

199 
165 
275 



69 
199 



399/40 
269/25 
399/40 



S-100 BOARDS 

HAYESS-100M0DEM 325 HAYESSMARTMODEM 219 
HAYESCHRONOGRAPH 189 CCS64KRAM BOARD 525 



FLOPPY DISKS 



Elephant 5 25" 
SoftSSSD/bx 
3M5"SoftSSSO/bx 
Maxell 5 " Soil SSSD/bx 

DYSAN5"SoftSSSD/bx 



Elephant 8 " 
SoftSSSD/6x 
3M8"SoftSSSD/bx 
Maxell 8" Soft SSSO/bx 
DYSAN8"SofSSSD/bx 



BONUS SOFTWARE SECTION ! 



Let us acquaint you with MESSAGE-MAKING SOFTWARE Just place the disk in the 
APPLE, enter the text, and colorful, dynamic messages appear on the screens or TV sets 
connecied to the computer Use the software to broadcast messages on TV screens in 
schools, hospitals, factories, store window, exhibit booths, etc The following program is 
our latest release 

SUPER MESSAGE. Creates messages m lull-page "chunks" Each message allows 
statements ol mixed typestyles. typesizes and colors, in mixed upper and lower case 
Styles range from regular APPLE characters, up to double-size, double-width characters 
with a heavy, hold fonl. Six colors may oe used for each different typestyle. ^rtical and 
honzonfal centering are available, and word-wrap is automatic. Users can chain pages 
together to make multi-page messages. Pages can be advanced manually or automatical- 
ly. Multi-page messages can be stored to disc or recalled instantly 
PEOUIRES 48K & POM APPLESOFT $50 

APPLE PLOTS YOUR DATA 4 KEEPS YOUR RECORDS TOO! APPLE DATA GRAPH 2.1: 
Plots up to 3 superimposed curves on the Hi-res Screen both X & Y axes dimensioned. 
Each curve consists of up to 120 pieces of data. Graphs can be stored to disc and recalled 
immediately lor updating. Up to 100 graphs can be stored on the same disc. Great for 
Slock-market Charting, Business Management, and Classroom instruction! 
REOUIRES48K 4 ROM APPLESOFT . ..$35. 

APPLE RECORD MANAGER: Allows complex files to be brought into memory so that 
record searches and manipulations are instantaneous Records within any file can con- 
tain up to 20 fields, with user-defined headings. Information can be string or numeric. 
Users can orowse thru files using page-forward, page-backward or random-search com- 
mands Records can easily be searched, altered or sorted at will. Files can be stored on 
the same drive as the master program, or on another, if a second drive is available. 



Records of files can be printed, if desired. Additional modules coming are a STATISTICS 
INTERFACE, CHECKBOOK. MAILING LIST 4 DATA-ENTRY 

REQUIRES 48K 4 ROM APPLESOFT $40. 

APPLE LITERATURE DATABASE: Allows rapid retrieval (via keywords) of references from 
total APPLE literature thru 1980, on 5.25 "disk. Each entry in the data base consists of the 
article, author-name, periodicai-name. date of issue, & page nos. The database is 
intended to support large magazine files which would require lengthy manual searching 
to recover information. Annual updates will be available. 
REQUIRES48K & ROM APPLESOFT. . . $60. 

WORDPOWER Is a simple, powerful, low cost, line-oriented word-processor program It 
offers a fast machine language FIND & REPLACE. Text can b3 listed to screen or printer, 
with or without line-numbers. Lower-case adaptors are supported. You can merge files, 
move groups of lines, and easily add, change, or delete lines. WORDPOWER can be used 
to create and maintain EXEC files, it can also oe used as a rapid, unstructured, inlorma- 
tion-storage and retrieval system via its <apid search capabilities. 
REQUIRES 48K & ROM APPLESOFT $50. 

LABELMAKER. Allows users to quickly createaddress labels. A given label may be gen- 
erated in any quantity from 1 to 32767, Space is allowed on labels for a personal and 
company name, but the s.iace is automatically closed up if only a personal name is 
entered. Space is also allowed for foreign countries. The program can also generate 
labels lor price-tags, f^rt numbers and mail-messages such as : 'RUSH". "FRAGILE", etc. 
A self-incrementing ,eature allows theatre-tickets to be produced, with a date, and 
numbers running from aOOO to z999. An editor is provided for editing labels prior to print- 
ing. Ail labels may be saved to disk for instant recall. 
REQUIRES 48K & ROM APPLESOFT $35 



Above software for APPLE DOS 3.2/3.3 only. Call for BONUSES for other systems. 

TO ORDER: Use phone or mail. We accept VISA, MASTERCARD, COD's, personal checks & 

money orders. Add 4% for credit card. Customer pays handling on COD orders. Foreign 

orders must be in American Dollars & include 10% for handling. Connecticut residents add 

7.5% sales tax. Prices subject to change without notice. 

Not responsible tor typographical errors Prices subject to change without notice 



CONN. INFO. SYSTEMS CO. 
(203)579-0472 

218 Huntington Road, Bridgeport, CT 06608 
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A sophisticated, yet easy to use diagnostic 
aid for getting "the hugs" out of your assembly 
language programs. 

If you are a novice just getting started with assembly-langi 
programming, you will find The BUG helpful in devef 
your understanding of how the Apple's 6502 internal pre 
operates. The many display options of The BUG will pern 
try out your assembly-l? nn ' i3r,Q ^r^mme ct th Q c-^or,^ *h 
comfortable for you. Th^ uu ^.„,„ „,o„ , ,,^,^ ,,^o r ,„,,„ 
effect of your program or? the Apple as it executes 

If you are a professional programmer, you will also find th 
improve your efficiency by redu 
solving complex, assembly-language programming errors 
appreciate the fact that The BUG offers the easiest to use 
breakpointing capability of any ' 'debugger' 'available for the 
breakpoints can be specified to halt program execution wh 
program location is reached, 2) one of the 6502 registers n 
or 3) one of the bits in the 6502 status register reaches e 

Another key feature of The 

to AUTOMATICALLY run lower-level subroutines at FULL 

to keep debugging the portions of your proc 

This is not the least expensive "debugger'' program for V 
to find more capability for less" money 1 

The BUG is supplied with a 40 + page user guide and 
on either the Apple II or Ap 

l#UILv W^IPHJ .... provides an easy to u 
tions for strings. Creating charts, reports and general sci 
BUILD USING is written entirely in machine language a 
garbage collection (those unnecessary delays that s 
USING, you can choose how many digits should be displa 
you can even fill the leading positions with the character < 
number '1 57.23' as '1 57.2', or '00001 57.230', or '. » • » * $1 ! 
ways (including exponential formats). Working with strings 
'John" and 'Doe' to ' 
numbers or strings that cannot fit in your specified forma 

Utilities like BUILD USING are usually difficult to use b& 
(usually between DOS and the DOS file buffers) they ca 
routines. BUILD USING does not have this limitation, as 
tions: 1). the "normal" between DOS and 
or4)anywhere else in memory Appending BUILD USING 
USING uses the "CALL" command thereby leaving the i 

BUILD USING requir. " : " "™" " """' '™ ""'^ 



IMAGE PRINTER SERIES 

Sensible Software is proud to introduce our new series of high 
resolution screen dumps. IMAGE PRINTERS provide a simple way 
to transfer high resolution graphic images onto paper. Each pro- 
gram in the series has unique features that give you full control of 
the printing. Some of the included options are: 

• Full control over the area of the HIRES screen to be printed. You 
graphically pick the area for the utmost ease and accuracy. 

• One-step printout of the picture with the ability to pause or abort 
the printing at any time. 

• Menu-driven. All options are invoked with single keystrokes. 
IMAGE PRINTERS are extremely easy to use. 

• Multiple image sizes, 6 different sizes for letter quality printers, 
4 sizes for other printers. 
• Creation of an inverse (negative) image for reverse printing. 

The ability to save the compressed and inverse images to 
disk. 
One time configuring for your printer and interface card. 
Why answer all those questions about your printer each 
time you want to print a picture? 
The images may be printed anywhere on the page. 
• IMAGE PRINTERS support most popular interface 
cards, such as cards from Apple, California Compu- 
ter Systems, Epson, and Mountain Computer. (The 
SSM AIO Serial Card and user-written 'driver' 
routines may be used with the letter quality 
printers.) 

There are three separate versions of IMAGE 
PRINTERS, each one tailored to take full ad- 
vantage of a different printer. 

IMAGE PRINTER— LETTER QUALITY. For 
all popular letter quality printers (Diablo, 
NEC, Qume, etc.) 

IMAGE PRINTER— EPSON. For the 
popular Epson MX-70, MX-80 and 
MX-100. 
IMAGE PRINTER— NEC PO8023A 
the NEC dot-matrix printer. 

All versions ore available 
fo f $40.00 ea. 

Please specify version desired. 



Die task 
f avoiding 
'ith BUILD 
lal point, and 
j can print the 



Sensible Software 

6619 Perham Drive Dept MO 
West Bloomfield, Michigan 
48033 • (313)399-8877 
Visa and Mastercard 
Welcome 
Please add $1 25 
postage and 
handling per 
diskette 



sEXECmqaTEXT 
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68000 FEATURE 



68000 Instruction Set 



Table 1: Data Movement 



by Joe Hootman 



Editor's note: The authoz has compiled 
several detailed tables of 68000 instruc- 
tions. This month 's article offers a brief 
introduction to the 68000, along with 
table 1. We will publish more instruc- 
tion tables in future issues, including 
those on addressing modes. 



Since its introduction, the Motorola 
MC68000 has set a trend for 16-bit 
microprocessors that may become an 
industry standard. One reason for the 
68000' s quick success is the design 
philosophy Motorola used when the 
68000 was conceived. Motorola wanted 
to give the 68000 a simple instruction 
set, and a flexible set of addressing 
modes. They also wanted it to be com- 
patible with 6800 peripheral hardware 
and to contain many programming fea- 
tures. The implementation of this 
philosophy allows 6800/6809 micro- 
processor users to adapt easily to using 
both 68000 hardware and software. The 
instruction set, while compact, con- 
tains many special instructions that are 
unique to the 68000. These instruc- 
tions allow two different processing 
states to exist in the 68000, as well as 
movement of data from 6800 peri- 
pherals. Special arithmetic instructions 
are also provided. 

68000 users can turn to several 
references for help. The Motorola Users 
Manual 1 is essential for every 68000 
user. An excellent book by L. J. 
Scanlon 2 explains the 68000 in detail, 
and provides excellent programming 
examples. The 68000 Microprocessor 
Handbook by G. Kane 3 discusses char- 
acteristics and features of the 68000. 

Special features of the 68000, which 
differentiate it from the 6800 series of 
microprocessors, are: 

1. The data bus of the 68000 is 16 bits 
wide. 

2. The 68000 is microprogrammed. 

3. The 68000 is expandable. These ex- 
pandable features will be defined by 
Motorola in the future. 



Mnemonic Data Size/CCR Name 



Comments/Address modes and opcode 



MOVEA 



16,32 
CCR 



Move 
Address 



XNZVC 













Moves the contents of the source to the 
destination address register. Sign of word 
data is extended to 32 bits. 

Opcode Format 
15 14 13 12 1110 9876543210 



Size 



Destination 
Reg 0|0|1| 



Source 
Mode I Reg 



All addressing modes can be used for the source 
Held. • 



MOVEM 



16, 32 
CCR 



XNZVC 


- 


- 


- 


.- 


..- 



Move 

Multiple 

Registers 



Designated registers may be moved to an 
effective address. 



15 14 13 12 11 


Opcode Format 
10 9 8 7 6 


543 


2 1 





1 








1 direc- 
tion 








1 


size 


Effective Addr. 
Mode Reg. 


Register List Mask 



Direction: 0-register to memory, 
1-memory to register 
Size: 0-word field, 1-long word 

Post Increment Address Mode 
15 14 13 12 11 10 9 8 7 6 5 4 3 2 1 



A7 A6 A5 A4 A3 A2 AI A0 D7 D6 D5 D4 D3 D2 DI DC 



Predecrement Addressing Mode 
15 14 13 12 11 10 9 8 7 6 5 4 3 2 1 



DO Dl D2 D3 D4 D5 D6 D7 AO AI A2 A3 A4 A5 A6 A7 



Predecrement Address modes cannot use 
Addressing modes: 1, 2, 4, 11, 12, 13, 14 * 



Post increment Address modes cannot use 
Address modes: 1, 2, 5, 13, 14 * 



MOVEP 



16, 32 
CCR 



X 


N 


Z 


V 


c 













Move 

Peripheral 

Data 



Data is moved between data registers and 
memory. The high order byte of data bus is used 
when address is even; if address is odd the 
transfers are made to the low half of data bus. 
This instruction can be used to transfer data 
from 6800 devices. 
15 14 13 12 11 10 9 8 7 6 5 4 3 2 1 







Data 
Register 



Op-Mode 



Address 
Register 



Displacement 



Opmode: 100-Word from memory to register 

101-Long word from memory to register 

1 10- Word from register to memory 

1 1 1-Long word from register to memory 



MOVEQ 



32 
CCR 



X 


N 


Z 


V 


c 


- 


* 


* 









Move Move 8-bit immediate data to a data register, 

Quick with sign extension. 

15 14 13 12 11 10 9 8 7 6 5 4 3 2 1 






1 


1 


1 


Register 





Data 



(Continued) 
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68000 FEATURE 



Mnemonic Data Size/CCR Name 



Comments/ Address modes and opcode 



MOVE from 16 
SR CCR 



MOVE 



MOVE to 
CCR 



SWAP 



EXG 



LEA 



PEA 



X 


NZ VC 













Move from The contents of the status register is moved to 

status the destination location. 

register 

15 14 13 12 11 10 9 8 7 6 5 4 3 2 1" 






1 




















1 


1 


Effective Address 
Mode 1 Register 



This instruction cannot use the following 
Address modes: 2, 10, 11, 12, 13, 14.* 



8, 16, 
CCR_ 


32 




be 


N 


z 


V 


C 


r 


* 


* 









Move data 
from 
source to 
destination 



This instruction moves the contents of the 
source to the destination. 

15 14 13 12 11 10 9 8 7 6 5 4 3 2 1 



Size 



Destination {EA) 
Register {Mode 



Source (EA) 
Mode I Register 



The size specifies the size of the data to be 
moved. 

01 -Byte 10-Longword 11-Word 

The effective address of the destination cannot 
use: 10, 11, 12, 13, 14* 

The effective address of the source can use all 
the addressing modes except 13, 14. * 



16 

,£CR_ 






X 


N 


Z 


V 


C 


* 


* 


* 


* 


* 



Move 

condition 

code 



The content of the source is moved to the 
condition code register. 

15 14 13 12 11 10 987654321 






1 











1 








1 


1 


Effective Address 
Mode 1 Register 



All addressing modes can be used except 13, 14 * 



16 
CCR 



X 


N 


Z 


V 


c 


. 


* 


* 









Swap 

register 

halves 



This instruction exchanges the upper half of a 
data register with the lower half of the data 
register. 
15 14 13 12 11 10 9 8 7 6 5 4 3 2 1 






1 








1 





o Jo 





1 








Register 



The addressing mode of this instruction is 
inherent. 



32 
CCR 



X 


N 


Z 


V 


c 













Exchange 
registers 



This instruction exchanges the contents of two 
registers. The exchange can take place between 
any of the registers. 
15 1413 12 11 10 9 8 7 6 5 4 3 2 1 



2L0 



Register 
Number I 1 



Op-mode 



Register 
Number 



Opmode: 01000-data registers 

01001-address registers 
10001-data and address registers 
(bits 0-2 must be address register 

number) 
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Load 

effective 

address 



The effective address is loaded into the 
specified address register. 

15 14 13 12 11 10 9 8 7 6 5 4 3 2 10 
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Effective Address 
Mode I Register 



This instruction cannot be used with the 
following addressing modes: 1, 2, 4, 5, 13, 14* 
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Push 

effective 

address 



The effective address is computed and the 
long word is pushed onto the stack. 
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Effective Address 
1 Mode 1 Register 



This instruction cannot use the following 
addressing modes: 1, 2, 4, 5, 13, 14 * 



•The Addressing Modes will be presented in future issues. 



4. The 68000 will work with 6800 
parts, with a special software state- 
ment, and hardware for completing 
the handshaking requirements. 

5 . The 68000 is capable of addressing a 
large amount of memory. 

6. The 68000 has a minimum number 
of instructions with a large number 
of addressing modes. 

7. The 68000 is capable of supporting 
multiple users. 

8. A supervisory state exists that is pro- 
tected from access by the user. This 
state is used to support the overhead 
for multiple-user hardware inter- 
rupts, and certain classes of user- 
generated errors and traps. 

9. The hardware architecture and soft- 
ware of the 68000 will easily support 
higher-level languages such as ADA, 
Pascal, Fortran, etc. 

These features indicate that the 
68000 will exist in its present form, or 
in a mildly modified form, for a signifi- 
cant length of time. The expandable 
features of the 68000 will allow users 
to learn a machine, and develop soft- 
ware and hardware, without fear of 
their work becoming quickly obsolete. 



MOVE 

Table 1 displays the MOVE instruc- 
tions implemented in the 68000. These 
instructions move data both inside the 
processor from register to register, and 
from external RAM and external de- 
vices. The table indicates which bits 
are set in the USR with the completion 
of the instruction. The user part of the 
status register is the lower eight bits of 
the register; the system part is the up- 
per eight bits. Motorola, in their in- 
struction set, has chosen to refer to the 
user portion of the status register as the 
Condition Code Register (CCR). 

A dash (— ) in a bit location in- 
dicates that the operation has no effect 
on the bit. A * indicates that the opera- 
tion may alter the bit, depending on the 
data and operation. Note that all the 
move operations except one do not set 
the V or C bits; these bits can only be 
set or cleared by an operation on data, 
or specific operations on the CCR. 

The MOVE to CCR (move to condi- 
tion code) can set or clear every bit in 
the CCR. This instruction could be used 
to check on the state of the first four 
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bits of a word, or to set or clear bits in 
the CCR. (The instruction could also 
be used to unstack the CCR from 
memory.) 

MOVE (MOVE data from source to 
destination) is a popular instruction 
because it allows movement of data 
between data registers and address 
registers inside the 68000. It also 
allows the movement of data between 
the 68000 and RAM. 

MOVE and MOVE A (Move Address) 
are similar, except that MOVE A is the 
instruction reserved for moving data to 
the address registers. That is, the 
destination register in the MOVE A in- 
structions are the address registers. The 
MOVE instruction is generally used to 
move data to and from the data regis- 
ters. Proper coding results in the 
MOVE A instruction. 

If you want to examine the status 
register to find out the state of the X, N, 
Z, V, and C bits, as well as allowing the 
checking of the interrupt mask, the 
trace (T), and supervisor status, use the 
MOVE from SR (Move from Status 
Register) instruction. 

One of the most powerful move in- 



Attention 

Software and 

Hardware 

Manufacturers! 

Have You Seen Our 
Reviews in Brief? 

MICRO'S product review 
department offers readers 
an easy-to-read and highly 
informative review of 
current products. If you 
would like your product (s) 
reviewed in MICRO, ask 
for a list of our panel of 
qualified reviewers. You 
can contact them directly! 



structions is MOVE M (Move Multiple 
Registers). This instruction allows the 
movement of the selected data registers 
to consecutive memory locations. It 
could be used to store the results of 
multiple word arithmetic operations. 
For example, if the IEEE floating point 
arithmetic standard is implemented, 
the registers would contain the various 
components of the floating point num- 
ber. Note that because both data regis- 
ters and address registers can be moved, 
this instruction can be used to stack 
the registers. 

MOVE P (Move Peripheral Data) is 
used to move 8-bit data to the data 
registers from memory, or transfer 8-bit 
data from the data registers to memory. 
This instruction, in conjunction with 
the proper hardware interface, allows 
the transfer of data between the 68000 
and 6800 peripheral parts. 

MOVE Q (Move Quick) allows the 
immediate movement of 8-bit data to 
any designated data register. The sign 
of the data is extended to fill the 32 bits 
of the data register, thus the operation 
is always a long word operation. Some 
assemblers will use a MOVE Q instruc- 
tion every time 8-bit data are to be 
moved. 

The SWAP (Swap Register Halves) 
is not the same as the previously 
discussed MOVE instructions, but it is 
a data movement instruction. This in- 
struction will place the upper 16 bits of 
the designated data register into the 
lower 16 bits of the designated data 
register. The lower 16 bits will be 
moved to the upper 16 bits of the regis- 
ter. This instruction could be used to 
move data in a 32-bit register into a 
position to be tested by the CCR. 

EXG (Exchange Registers) ex- 
changes the contents of two registers 
using the full 32 bits of the two 
registers. EXG will exchange data 
registers with data registers, address 
registers with address registers, and ad- 
dress registers with data registers. This 
type of instruction, could move an ad- 
dress register to a data register to allow 
operations and testing of the state of 
the address, while not destroying the 
contents of the data register. 

LEA (Load Effective Address) loads a 
specified address register with an effec- 
tive address. LEA loads all 32 bits of the 
address register from memory. For ex- 
ample, LEA cannot be used to load the 
address register from a data register. 
MOVE A can be used for this. LEA ef- 
fectively increments or decrements the 
contents of a register. To implement 



the incrementing of a register, LEA is 
used with auto-incrementing or auto- 
decrementing addressing. 

PEA (Push Effective Address) 
pushes the specified address onto the 
stack. This instruction is used as the 
traditional push instruction. 
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Diskettes and all your media needs 
Out REGULAR prices are SPECIAL 

CALL FREE (800) 421-3957 

C.O.D. charge cards accepted. 
Excellent dealer program. 
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74/szard-SO&" 

SERIAL OUTPUT BUFFER CARD 

Input a new task while your old task prints out 



NO MORE DELAY 
FOR SLOW PRINTERS 

WIZARD-SOB is a serial 
printer interface that lets you 
operate your Apple while data 
from your previous operation 
is printing out. It ends waiting 
while your printer prints. The 
WIZARD-SOB contains a 
16K byte "character buffer" 
that may be expanded to 
32K bytes of character buffer- 
ing. It accepts data at the 
Apple's rapid transfer rate, 
stores the data and feeds it 
to your printer at the rate 
the printer can accept. 

■ Fully compatible with all 
Apple II and Apple II Plus* 
computers 

■ Fully compatible with most 



Apple software including 
Applesoft BASIC' , Integer 
BASIC*, CP/M, Pascal, etc. 



Apple II expansion boards. 

■ Low power consumption 
for cool reliable operation 

■ Leads soldered directly into 
board for reliable operation 

■ Many formatting features. 

■ Two-year factory replace- 
ment warranty 

■ RS-232 printer interface 
compatible 

Backed by the world's #1 
independent manufacturer of 
peripheral controllers 

Available at all fine 
Computer Stores S249.00 
Telephone (800) 854-8737 
(714) 850-1666 



H0-11IESPEH lllil'.llll 
Si|sti:ms 

SUBSIDIARY OF WESPERCORP 






INPUT YOUR NEXT 
TASK WHILE YOUR 
PRINTER PRINTS OUT 
YOUR LAST TASK . . . 
WESPERMICRO 
SYSTEMS ADDS VALUE 
TO YOUR APPLE. 





THE TACKLER™ 

DUAL • MODE PARALLEL INTERFACE FOR 

THE APPLE* 

2 BOARDS IN ONE FOR NO MORE 

COMPATIBILITY PROBLEMS! 

An intelligent board to provide easy control of your 

printer's full potential. Plus a standard parallel 

board at the flip of a switch - your assurance of 

compatibility with essentially all software for the 

APPLE*. Hires printing with simple keyboard 

commands that replace hard to use software 

routines. No disks to load. Special features include 

inverse, doubled, and rotated graphics and many 

text control features, available through easy 

keyboard or software commands. 

If s simple to print HIRES graphics from an APPLE computer with The Tackier 

from TYMAC. This is the first truly universal parallel interface! Plus the ROM 

for your specific printer. Sophisticated intelligence when you need it, total 

compability that never lets you down. 

Change printers - no need to buy another board. Just plug in one of our 

ROM'S and you're all set ROM'S available for Epson, C. Itoh, NEC, and 

Okidata - others available soon. 

You've asked u« to make the TACKLER better than the others and we 

did. $159.00* 

UPGRADEABLE 
PARALLEL PRINTER CARD 
A Universal Centronics type parallel printer board 
complete with cable and connector. This unique 
board allows you to turn on and off the high bit so 
that you can access additional features in many 
printers. Easily upgradeable to a fully intelligent 
printer board with graphics and text dumps. Use 
with EPSON, C. ITOH. ANADEX, STAR-WRITER, 
NEC, OKI and others with standard Centronics 
configuration. $139.00 




THE PERFORMER PRINTER 
FORMATTER BOARD for Epson, OKI, NEC 
8023, CITOH 8510 provides resident HIRES 
screen dump and print formatting in firmware. 
Plugs into Apple slot and easy access to all 

G 'inter fonts through menu with PR# command, 
se with standard printer cards to add intelligence. 
$49.00 specify printer. 




THE MIRROR FIRMWARE FOR NOVATION APPLE CAT II s 

The Data Communication Handler ROM Emulates syntax of an other popular 
Apple Modem product with improvements. Plugs directly on Apple CAT II 
Board. Supports Videx and Smarterm 80 column cards, touch tone and rotary 
dial, remote terminal, voice toggle, easy printer access and much more. 
List $39.00 Introductory Price $29. CO 



DOUBLE DOS Plus 

A piggy-back board that plugs into the disk-controller card so that you can 
switch select between DOS 3.2 and DOS 3.3. DOUBLE DOS Plus requires 
APPLE DOS ROMS. $39.00 



NIBBLES AWAY II 



AGAIN! Ahead of all others. 
AUTO-LOAD PARAMETERS . . . Free's the user from having to 

Manually Key in Param values used with the more popular software 

packages available for the Apple II. 
EXPANDED USER MANUAL . . . incorporates new Tutorials for 

-all levels of expertice; Beginners Flowchart for 'where do I begin' to 

'Advanced Disk Analysis' is included. 
TRACK/SECTOR EDITOR . . .An all new Track/Sector Editor, 

including the following features: Read, Write, Insert, Delete Search, 

and impressive Print capabilities! 
DISK DIAGNOSTICS . . . Checks 

such things as: Drive Speed, Diskette 

Media Reliability, and Erasing Diskettes. 
HIGHEST RATED ... Best back up 

Program in Softalk Poll (Rated 8.25 

out of 10). 
CONTINUAL UPDATES . . .Available 

from Computer Applications and new 

listings on the source. "^ Mr Hopoy 




$69.95 



Super PIX hires screen dump 

The Software package that will allow your printer to dump page 1 or page 2 of 
the Apple Hires screen horizontally or vertically. Use with EPSON* MX-80 
with or without GRAFTRAX* Roms, MX-70 - OKI* Microline 80, 82, 83, 82A, 
83A- C. ITOH* 8510 and NEC 8023A. Requires Tymac Parallel Printer 
Board PPC-100 . . . $24.95. 



APPLE LINK- A versitile modem utility that provides the Apple user the 

ability to transfer disk files and software over the phone. Only one package 

needed for full transfers. Compatable with all DOS file types. $59.00 

(requires Hayes Micro Modem) 



TH E APPLE CARD- Two sided 1 00% plastic reference card Loaded with 
information of interest to all Apple owners. $3.98 

/HICRO-H0RE DIST. INC 

P.O. BOX 1 1 3 POMPTON PLAINS. N.J. 07444 

Dealer and Distributor Inquires Invited. 




It Pays to 
Write for MICRO! 

MICRO Magazine is actively seeking articles to present to our unique 
audience of sophisticated computerists. We welcome contributions on 
any aspect of 6502/6809/68000 hardware and software. Send us your 
latest ready-to-key-in program! 

Each issue of MICRO presents articles on a wide range of systems and 
topics. In addition, each issue includes a special feature. We are planning 
features on the following topics: 

January-Math and Simulations February-Languages March-Printers 

April-Communications May-Wave of New Computers June-Operating Systems 

If you've developed material relating to these subjects, we'd like to see it! 
Send articles to the attention of the editorial department. We are con- 
tinually looking for good articles and/or programs for the: 

Atari, Apple, CBM/PET, VIC, 68000, 6809, and TRS-80 Color Computer. 

Standard MICRO categories that may be included in any issue are: 

I/O • BASIC Aids • Machine-Language Aids • Graphics 

Games • Applications • Programming Techniques • Utilities 

Programming Languages • Hardware 

We are also interested in topics our readers feel are important. Send in 
your own feature suggestions! 

MICRO is sold in computer stores and on newsstands all over the world! 
Publishing an article in MICRO means quick distribution of your ideas. 

We're proud of the fact that MICRO'S circulation is growing by leaps and 
bounds. And, we pay as well as BYTE! Get a copy of our Writer's Guide 
now! 



Special Note to all MICRO authors: please begin sending your text as well as 
your programs in machine-readable format. This will enable us to edit the text 
with the help of word processing. Continue to include a printed text version as 
you include a printed program listing. 
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FOR YOUR APPLE II 

Industry standard products at super saver discount prices 





PARALLEL PRINTERS 
NEC 8023 or C-ITOH 8510 

(Virtually identical) Specifications: • 100 CPS dot 
matrix printer • 80 column print— 136 characters 
per line • Tractor/friction feed • 7 different print 
fonts included • 2K printer buffer • Proportional 
spacing • Bit image graphics and graphic symbols. 

NEC 8023 or C-ITOH $495 

NEC 8023 or C-ITOH 8510 with 

Parallel Interface and Cable $550 

EPSON 100 with Parallel interface 

and Cable $749 



Z-80 CARD FOR YOUR APPLE^ 
MICROSOFT SOFTCARD 

With CP/M- and MBASIC. 

(List: $399) $289 

v^tW, Best Buy! !! 
4Sm ADVANCED LOGIC SYSTEM 
^PF Z-CARD WithC-PM- 

Has everything the Softcard has except MBASIC. 
Works with Microsoft's disks too. 

(List $269) Special at $195 

ALS SYNERGIZER 

CP/M" operating package with an 80 column 
video board, CP/M* interface, and 16K memory 
expansion for Apple II. Permits use of the full 
range of CP/M' software on Apple II. Includes 
SuperCALC. 

(List: $749) $549 

U-Z-80 PROCESSOR BOARD 
(From Europe) 

Software compatible with Softcard and 

ALS Software $149 

MICROSOFT + PREMIUM SYSTEM 

Includes Videx Videoterm, Softswitch, Microsoft 
and Softcard, Microsoft and Z-80 Card, and 
Osborn CP/M" Manual $595 



JOYSTICK 

Takes the place of two 
Apple Paddle Controllers. 

From BMP Enterprises. Heavy duty industrial con- 
struction and cable. Non-self centering. With 
polarity switches for consistent motion control. 

(List: $59) $39 



MONITORS FOR YOUR APPLE 

AMDEK 300G 

(18MHZ Anti-Glare Screen) $179 

NEC 12" HIRES GREEN $179 

SUPER SPECIAL! 

SPECIAL 12" GREEN MONITOR $99 





SPECIAL AND NEW 

5 MEGABYTE HARD DISK 

For Apple II. Supplied with controller. Use with 
CP/M, Apple DOS, & Apple Pascal $1995 

5VV DISK DRIVE 

Use with standard Apple II disk controller. .$295 

5V4" FLOPPY DISKS 

With hub rings.Boxof 10. 

With other purchase $19.95 

Without purchase $23.00 

16K MEMORY EXPANSION MODULE 

The preferred 16K RAM Expansion Module from 
PROMETHEUS. Fully compatible with CP/M' and 
Apple Pascal". With full 1-year parts and labor 
warranty. (List: $169) $75 

WORD PROCESSING SPECIAL 
WITH WORDSTAR AND SUPERCALC! 

Do professional word processing on your APPLE. 
All necessary hardware and software included. 
Complete 80 column video display, enhanced 
character set, 16K memory board, Z-Card with 
CP/M* software, Wordstar and word processing 
software and SuperCALC. 
^^ kAj (List: $1 ,128) . . . .Special at $695 

^PfF from Prometheus! ExpandaRAM 

The only 128K RAM card that lets you start with 
16K, 32K, or 64K of memory now and expand to 
the full 128K later. Fully compatible with Apple 
Pascal, CP/M", and Visacalc. No Apple modifi- 
cation required. Memory management system in- 
cluded with all ExpandaRAMs. Disk emulators 
included with 64K and 128K versions. 

MEM-32 Two rows of 16K RAMS 

make a 32K RAM Card $209 

MEM-64 One row of 64K RAM. 

With DOS 3.3 disk emulator $299 

MEM-128 Two rows of 64K RAMS installed 

makea128KCard. 

With DOS 3.3 disk emulator $399 

MEM-RKT 64KRAMAdd-On-Kits- 

64K Dynamic RAMS. Each $125 

VISICALC Expansion Program 

for MEM-128 $75 

MEM-PSL Pascal disk emulator for 

MEM-128 $45 

MODEMS FOR YOUR APPLE II 

HAYES Smartmodem $229 

MICROMODEMII $279 




VERSAcard FROM PROMETHEUS 

Four cards on one! With true simultaneous opera- 
tion. Includes: (1) Serial Input/Output Interface, 
(2) Parallel Output Interface, (3) Precision Clock/ 
Calendar, and (4) BSR Control. All on one card. 
Fully compatible with CP/M - and Apple Pascal". 

(List: $249) $169 




80 COLUMN 

VIDEO DISPLAYS 

FOR APPLE II 

SMARTERM 

(Not to be confused with SUPRTERM) 

Software switching from 80 to 40 and 40 to 80 
characters. 9 new characters not found on the 
Apple keyboard. Fully compatible with CP/M* and 
Apple PASCAL'. With lowest power consumption 
01 only 2.5 watts. 

(List: $345) $225 

SMARTERM EXPANDED CHARACTER SET 

7" x 11" matrix with true decenders. Add to 
above $40 

„ „ Combination SMARTERM and 

Best Buy! EXPANDED CHARACTER SET 

Special at $260 

VIDEX, VIDEOTERM $249 

VIDEX ENHANCER II $119 

JtHfr CENTRONICS COMPATIBLE 
Kir PARALLEL INTERFACE 

From PROMETHEUS. For use with Epson, NEC, 
C-ITOH, and other printers. Fully compatible with 
CP/M* and Apple Pascal*. 

PRT-1, Only $69 

GRAPHITTI CARD 

Prints HIRES page 1 or 2 from onboard firmware. 
Features: True 1:1 aspect ratio, prints emphasized 
mode, reverse mode, rotates 90 degrees . . . plus 
more. Compare all this with the Grappler. We think 
you'll agree that this is the best graphics card on 
the market. Specify for use with EPSON, NEC- 
8023, C-ITOH Prowriter, orOkidata. 

(List: $125) $89 

SOFTWARE 

WORDSTAR Special at $195 

SPELLSTAR $125 

SUPERCALC $175 

DBASE II $525 

VISICALC $149 

DB MASTER $189 

All equipment shipped factory fresh Manufacturers warranties 
included. Please add $3 00 per product tor shipping and handling. 
California: add 6% tax; BART Counties: 6'A%. 

All items are normally in stock 

Phone fori 
Shipment! 

[415)490-3420 

. . . And we'll be here to help after you 

r=* receive your order. Feel free to call the SGC 

'\ Technical Staff for assistance. 

The mail order specialists 

342 Quartz Circle, Livermore, CA 94550 
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Apple Slices 



By Tim Osborn 



This month's Apple Slices presents a 
technique to quickly access records on 
a random access file. This technique, 
called hashing, key-to-address trans- 
formation, or randomizing, converts a 
user key into an address (or record 
number) where the record associated 
with the key is stored. This key may be 
a customer number, part number, in- 
voice number, or anything that iden- 
tifies the target record to the user. 

Hashing should be used where quick 
random access is desirable. If the ap- 
plication calls for a lot of sequential 
processing, hashing will not be a good 
design choice for data organization. In 
situations where data is accessed by 
key in some undetermined order, 
hashing is at an advantage, because 
most records can be found within a few 
reads. Listing 2 is an example in which 
name and address records are hashed on 
the name field. I will refer to the listing 
to help clarify some points and to pre- 
sent a practical example. 

An important consideration in 
hashing is dealing with collisions or 
overflows. An overflow occurs when 
two or more keys in the key range gen- 
erate the same address (home record) 
within the address range. This can hap- 
pen if there are as many variations in 
the key set as there are addresses to 
store the data. For example, in my 
name and address retrieval system 
(listing 2), the file can hold up to a 
maximum of 500 records (a system 
design constraint) and there are an in- 
finite number of names. Therefore, 
many names may be transformed into 
the same address, creating overflow 
situations. 

Some overflow handling techniques 
include: 

1. Overflow linked lists: A separate 
area of the file is set aside for 
overflows. If an overflow occurs, it is 
stored in the first available overflow 
space and chained off from the home 
record. On a recall it is necessary to 



Listing 1 

AS > — 

10 CD$ - CHBS (4) 

20 PRIST CDS-OPM TEST-FIIB.U00" 

30 TOR J ■ TO 500 

40 PRIST CDS-WRITE TEST-FIIB.R";J 

50 TOR I ■ 1 TO 6 

60 PRINT AS 

70 KSCT 

so user 

90 PRIST CDS-CLOSE TEST-PTIB" 



search the chain until the key of the 
stored record matches the search 
key. The disadvantage of this tech- 
nique is that the chain must be 
maintained and the overflow space 
must be managed, which adds com- 
plexity. The advantage is that any 
number of overflows can be sup- 
ported as long as there is spare room 
in the overflow area. 

2. Distributed overflow space: Instead 
of using a separate overflow area, 
overflows are interleaved with nor- 
mal records by setting aside some 
records and designating them as 
overflow. The advantage here is that 
the proximity of an overflow may 
allow it to be accessed without re- 
quiring additional head movement 
of the random access device. For 
Apple owners this means that we 
would attempt to store overflows on 
the same track as the home record. 
The disadvantage is that chain main- 
tenance adds complexity to the 
system. 

3. Open addressing: This technique 
tries to store the record in the home 
space first; if it is full, it stores the 
record in the next available space. 
This method is easy to implement. 
As long as a sufficient amount of free 
space exists in the file, the record 
can be stored close to the home 
record. The disadvantage is that, 
when the file begins to fill up, the 
search time increases, as it takes 
longer to find an unused record. 

After considering the various tech- 
niques available, I chose the open ad- 
dressing technique because of its design 



simplicity. I implemented this in my 
FIND routine (lines 9000-9060) by in- 
crementing the record number (KEY) 
until a free record was found or until I 
searched 20 records. I recognize a free 
record by NM$ being equal to NAM$ 
(NAM$ is set to null by the ADD 
routine before calling FIND), or by 
NM$ being equal to "0" . NM$ is null if 
the record has never been used (this is 
the way the file is initialized when 
listing 1 creates the file) and NM$ is 
equal to "0" if it was used at one time 
but is now available. The reason for a 
different code for a once-used record is 
that the program must continue to 
search up to 20 records, or until NM$ is 
equal to null (" "), to make sure the 
new record is not a duplicate. If NM$ = 
" ", then I know a record with this 
same key could not have been stored 
further into the file. It would have been 
stored here if it had searched this far 
before. If NM$ = "0", it is possible that 
this record was used when a record 
with the new record's key was added 
and the system had to look further into 
the file at that time to find a free space. 

If it finds a duplicate, the RC (return 
code) is set to 3 and returns to the ADD 
subroutine. The ADD subroutine will 
display a message and return to the 
main menu (line 7034). If NM$ = "0", 
FIND saves the available record num- 
ber in KY and sets RC = 2. This tells the 
ADD subroutine to use KY instead of 
KEY as the available space. This is 
necessary because the FIND subroutine 
continues to increment KEY to search 
for a record with a null value in NM$. 
This process can be described as 
follows (upon return to ADD): 



1. If RC=0, then KEY= the available 
space where we can store the new 
record. 

2. If RC = 1, then 20 records were 
searched and all were used. (ADD 
will display a "FILE TOO FULL" 
message.) 

3. If RC = 2, then a previously used 
record was available. The value in 
KY will be used as the available 
space. 
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4. If RC = 3, then the new record is a 
duplicate. |ADD will display a 
"DUPLICATE RECORD" error 
message.) 

FIND can be forced to search more 
records by raising the value of BIG 
(which is currently set at 20). If BIG is 
decremented, it is possible that 
previously stored records will not be 
found. I did some extensive testing 
with random key values and found that 
the "FILE TOO FULL" message was 
produced when the file contained ap- 
proximately 300 records with BIG set 
at 20. The trade-off is between efficiency 
and space; the further you allow 
records to be stored from the home 
record, the lower the efficiency. The 
more you limit record storage to the 
home record, the larger the amount of 
wasted space. 

The other major consideration 
when designing a hashing system is the 
key-to-address transformation tech- 
nique. This technique converts the 
user key into a physical location for 
storage. All techniques transform the 
key into a number within an order of 
magnitude that is the same as the 
number of addresses (records). Then 
they multiply the intermediate result 
by a factor that limits the final result to 
the range of addresses available on the 
storage device. 



In my system I chose a method 
called center-squaring. This method in- 
volves taking the key value, converting 
it into a number which can be squared, 
squaring the number, stripping off as 
many outer digits as necessary, and 
multiplying by a factor to limit the ad- 
dress to the valid range. My COM- 
PUTE ADDRESS subroutine (lines 
6000-6448) follows this sequence of 
operations. 

1. Line 6000 sets KEY to 0. KEY will 
become the address of the home 
record — the first record where we 
will attempt to store a new name 
and address record. 

2. Line 6002 finds the length of KEY$, 
which holds the name associated 
with the new name and address 
record. 

3. Lines 6005-6030 convert KEY$ into 
a number through table lookups and 
store the accumulation in KEY. The 
(J * J / 3) expression in line 6020 
helps insure that a number of the 
proper magnitude is produced. 



Listing 2 



1 GOSUB 10000: REM INITIALIZE TABLE 
10 BIG - 15:FL - 500:CDS - CHR$ (4): DIM SV$(6) 
14 PRINT CDS-OPEN TEST-FILE, L100" 
PRIST CDS 

if ac - o toes goto is 

FOR J » 1 TO 3000: NEXT J:RC - 
HOME s PRINT "(Q)UIT (A)DD" 
INPUT "(OHNKZ (D)ELETE (I)NQUIRE ";A$ 
IF AS - "A" TOES OOSUB 7000: GOTO 16 
IF AS - "C" THEN OOSUB 7200: GOTO 16 
GDSUB 7500: GOTO 16 
OOSUB 8500: GOTO 16 
PRINT CD$"CLOSE TEST-FILE" : 



15 

16 

17 

18 

20 

30 

40 

50 

60 

70 

80 

5998 

5999 



IF A$ 
IF A$ 
IF AS 
GOTO 18 

RBI 

REM ****COMPUTE ADDRESS**** 



"D" TOES 
"I" TOES 
"Q" TOES 



BSD 



6000 KBIT ■ 

6002 LH - LBJ (KEYS) 

6005 FOR I - 1 TO IN 

6010 MDS - MID* (KEYS, 1,1) 

6015 FOR J - TO 35 

6020 IF MDS - TBLS(J) TOES KEY > 

6030 NEXT i NEXT 

6050 KEY » KEY * KEY 

6060 KEYS - STR$ (KEY) 

6070 KEYS - MIDS (KEYS, 2, 3) 

6080 KEY - VAL (KEYS) 

6090 KEY - 1ST (KEY * .5) 

6100 RETURN 

6448 

6449 

6500 

6510 

6520 

6525 

6527 

6530 

6535 

6540 

6550 

6998 

6999 



KEY 4- (J * J / 3) :J - 35 



CTYStSV$(4) - STS:SVS(5) - ZPS:SV 



NORMAL : RETURN 



REM ****WRITE RECORD**** 
PRINT CDS? "WRITE TEST-FILE ,R":KEY 
PRINT NM$ 
PRINT RDS 
PRINT CTYS 
PRINT ST$ 
PRINT ZP$ 
PRINT TELS 
PRINT CDS 
RETURN 
REM 

REM ****ADD RECORDS**** 
7000 FUNGS - "ADD":NAMS - "" 

7005 GDSUB 8000: REM GET INPUTS 

7006 SVS(l) - »4$:SV$(2) - HD$:SVS(3) 
S(6) - TELS 

7007 KEYS - IMS 

7010 GDSUB 6000: REM COMPUTE ADDRESS 
7020 GOSUB 9000: REM FIND AVAIL. RFC 
7025 FUCS - "" 

7027 IF RC > TOES PRINT CDS 

7030 IF RC - 1 TOES INVERSE : PRINT "FILE TOO FULL" : 
7032 IF RC - 2 TOES KEY - KY 

7034 IF RC - 3 TOES INVERSE : PRINT "DUPLICATE RFEORD" : NORMAL : RETURN 

7035 NMS - SVS(1):RDS - SVS(2):CTYS - SVS(3):ST$ » SVS(4):ZP$ - SV?(5):TE 
LS -SV$(6) 

7040 GOSUB 6500: REM WRITE RECORD 
7050 RETURN 

7198 REM 

7199 REM ""CHANGE***** 

7200 HOME : PRINT "DO YOU WISH TO CHANGE TOE NAME?" 
7210 INPUT "REPLY (Y)ES OR (N)O ";A$ 

7220 IF AS - "N" GOTO 7290 

7230 IF AS < > "Y" GOTO 7210 

7235 INPUT "OLD NAME - ";NM$: IF NMS - "" GOTO 7235 

7240 KEYS - NMS: GOSUB 6000: REM COMPUTE ADDRESS 

7250 HAMS - NMS: GOSUB 9000: REM FIND RECORD 

7260 IF RC - 1 TOES : INVERSE i PRINT "RECORD NOT FOUND" ! NORMAL : PRINT 

CDS: RETURN 
7270 NMS - "0" i GOSUB 65O0: REM DELETE OLD RECORD 
7280 INPUT "NW NAME - ";»4$: IF M4$ - "" GOTO 7280 
7282 KEYS - NMS 

7284 GOSUB 6000: REM COMPUTE NEW KEY 
7286 GOTO 7330 

7290 INPUT "NAME - "jNMS:KEYS - M4S: IF (US - "" GOTO 7290 
7300 GOSUB 6000 

7310 NAMS - NMS: GOSUB 9000: REM FIND RECORD 
7320 IF RC - 1 TOES INVERSE : PRINT "RECORD NOT FOUND" : NORMAL : PRINT 

CD$: RETURN 
7330 INPUT "CHANGE STREET? , (Y)ES OR (N)O ";AS 
7340 IF AS - "Y" TOES INPUT "STREET - ";RD$: GOTO 7360 
7350 IF AS < > "N" GOTO 7330 

(Continued) 
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Listing 2 (Continued) 



7340 
7350 
7360 
7370 
7380 
7382 
7384 
7386 
7390 
7400 
7410 
7420 
7430 
7440 
7450 
7470 
7498 
7499 
7500 
7510 



IP AS - "Y" THEN INPUT "STREET - ";RD$: GOTO 7360 

ip a$ < > "N" anno 7330 

INPUT "CHANGE CITY?, (Y)ES OR (N)O ";A$ 

IP AS - "Y" THEN INPUT "CITY - "(CTY$: 

IP A$ < > "N" GOTO 7360 

INPUT "CHANGE STATE?, (Y)ES OR (N)O 



anno 7382 



;A$ 

;STS: aOTO 7390 



IP A$ - "Y" WES INPUT "STATE 

IP A$ < > "N" GOTO 7382 

INPUT "CHANGE ZIP?, (Y)ES OR (N)O ";A$ 

IF AS - "Y" TOES INPUT "ZIP - ";A$: OOTO 7420 

IP AS < > "N" OOTO 7390 

INPUT "CHANGE TEL. NO?, (Y)ES OR (N)O ";A$ 

IP A$ - "Y" THEN INPUT "TEL. NO. - ":TEL$: GOTO 7450 

IF A$ < > "N" GOTO 7420 

OOSUB 6500 

RETURN 

REM 

REM ****DELETE**** 

HOME 

INPUT "NAME - ";KEY$ 
7515 NAKS - KEYS 

7520 OOSUB 6000: REM COMPUTE ADDRESS 
7530 OOSUB 9000: REM FIND RECORD 
7540 IP PC - 1 THEN INVERSE I PRINT "RECORD NOT POUND" i NORMAL 

CD$: RETURN 
7550 NM$ - "0" 
7560 OOSUB 6500: REM WRITE RECORD 

RETURN 



PRINT 



7570 
7998 
7999 

8000 
8010 



REM 

REM ****GBT INPUTS**** 

HOME 

INPUT "NAME - "rNM$: IF NM$ =■ 
ESERVED NAMES 

INPUT "STREET - ";RD$ 

INPUT "CITY - ";CTY$ 

INPUT "STATE - "rST$ 

INPUT "ZIP - ";ZPS 

INPUT "TEL. N0.» ";TEL$ 

RETURN 

REM 

REM ****IK)UIRE**** 

HOME : INPUT "NAME - ";NAM$ 
8505 KEYS - NAM$ 
8510 OOSUB 6000: REM COMPUTE ADDRESS 

GOSUB 9000: REM FIND RECORD 

IF RC » I THEN INVERSE : PRINT ' 
CD$: RETURN 



OR NM$ - "0" GOTO 8000: REM 



8020 
8030 
8035 
8040 
8050 
8060 
8498 
8499 
8500 



8520 
8530 



RECORD NOT FOUND" : NORMAL : PRINT 



RD$ 

CTY$ 

STS 

ZPS 

TEL? 



8550 PRINT "STREET - 

8560 PRINT "CITY 

8565 PRINT "STATE - 

8570 PRINT "ZIP 

8580 PRINT "TEL. NO.» 

8590 PRINT 

8600 PRINT "PRESS RETURN TO CONTINUE" 

8610 GET AS 

8620 RETURN 

8998 REM 

8999 REM ****FIND RECORD**** 

9000 J = 0:RC - 

9010 IP J < > BIG GOTO 9020 

9012 IF RC - THEN RC - li RETURN 

9014 RETURN : REM RC-2 

9020 IF KEY > PL THEN KEY » 

9030 PRINT CD$"READ TEST-FILE,R";KEY 

9040 INPUT NMS,RD$,CTYS,ST$,ZPS,TEL$ 

9042 IF PUCS < > "ADD" THEN GOTO 9050 

9044 IF NMS - "0" AND RC - THEN KY = KEY:RC » 2: GOTO 9060 

9045 IF NM$ » SVS(l) THEN RC - 3: RETURN 
9050 IF NMS - NAM$ THEN PRINT CDS: RETURN 

KEY + 1:J - J + 1: GOTO 9010 



9060 KEY 

9998 REM 

9999 REM ****BUILD TABLE**** 

10000 DIM THL$(35) 

10010 FOR J = TO 35: READ TBLS(J): NECT J 

10015 RETURN 

10100 DATA "1","2","3","4","5 , ',"6","7", ,, 8", ,, 9","0 I 

"Y","U","I","0","P","A.","S","D","F","G\"H","J l 

"V","B","N","M" 



"Q","W","E","R" 
"K","L","Z","X" 



"T", 
"C", 



4. Line 6050 squares KEY. 

5. Line 6060 converts KEY back to a 
string (KEYS). 

6. Line 6070 takes out the second, 
third, and fourth digits, and stores 
them back in KEY$. 

7. Line 6080 converts KEY$ back to a 
numerical value (KEY) . 

8. Line 6090 brings KEY within the 
range of records on my file. When 
listing 1 creates the file, it creates 
500 records, thus the factor of .5. 



It is important that a key-to-address 
transformation method spread the 
records throughout the file as evenly as 
possible to minimize overflows. The 
address generated should bear no rela- 
tion to the key, so that a key with a 
higher value may be stored below a key 
with a lower value. This is often 
necessary because applications have 
many records with similar keys. If 
there is a relationship between the keys 
and the addresses generated, it would 
cause one part of the file to become 
full; overflows will occur in great 
numbers. 

I hope I have provided enough infor- 
mation to allow you to develop your 
own hashing applications. If you don't 
feel up to programming your own 
system, listing 1 and listing 2 can be 
used as a quick-access address book. 
Remember to run listing 1 first to in- 
itialize the file. If you get the "FILE 
TOO FULL" error message, then you 
may wish to bump up BIG, which is in- 
itialized on line 10. This will slow 
down access but will allow you to store 
more records. 

Otherwise, you can change listing 1 
to load more than 500 records. If you 
do, remember to change FL (file length 
— line 10) from 500 to the number of 
records you wish to load. Also change 
the range multiplication factor from .5 
to .xxx, where xxx is equal to the 
number of records you wish to load 
(line 6090). If you plan to load more 
than a thousand records, you will need 
to change the center-extraction from 
MID$ (KEY$,2,3) to MID$ (KEY$,2,4) 
orMID$ (KEY$,3,4). 



Reference 

1. Computer Data-Base Organization, 
by James Martin, Prentice-Hall, 
Englewood Cliffs, New Jersey. 
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Three minutes to find that "just right" property. 

Search through up to 3600 property listings with Real-Soft 
programs for Real Estate Agencies. 




Apple II is a trademark of Apple Inc 



50 



No need to flip through endless pages of listings to 
find that "just right" property. Simply have your 
client specify the price range, number of bed- 
rooms, preferred geographical location, accept- 
able house styles and up to 12 additional listing 
features. REAL-SOFT programs will find the right 
properties quickly and impressively giving you 
more time to view the selected properties and 
close the sale! 



REAL-SOFT is an integrated set of computer pro- 
grams designed specifically for real estate agency 
use. All routines are fully customizable to meet the 
requirements of virtually any agencies. Up to 10 
different house styles, 12 different listing features 
and 16 different areas. Very easy to learn — in- 
cluded is a complete set of practice data to experi- 
ment with. Requires 48K Apple II, 2 disk drives and 
monitor. Printer is optional. 



If printer is used a printout of selected properties 
can be output in only a few minutes for your client 
to view and discuss in detail. 



Other useful routines in this powerful set of pro- 
grams include a Property Availability Report, full 
Mortgage Amortization Tables (American OR 
Canadian method), and a Mortgage Compari- 
son Analysis Report. Then use still another 
part of REAL-SOFT to estimate the replace- 
ment cost of any listing (using local factors), 
or to estimate the mortgage amount that 
your client can qualify for! 



Available at your local Apple dealer. 



REAL- SOFT Real estate software 

1450 West Georgia Street, Vancouver, B.C. V6G 2T8 
Telephone (604) 669-2262 
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AMPER-POS for the Apple 



by Philippe Francois 



This machine-language utility 
extends Applesoft to include a 
POSition function similar to 
Pascal's. 

AMPER-POS 

requires: 

Apple II or Apple II Plus 
with Applesoft in ROM 
or language card 



To Pascal, there is a POS function that 
searches within the string variable 
TEXT for an occurrence of a character 
string matching the context of the 
"pattern" variable PATTERN. The 
value returned is an integer repre- 
senting the first character position 
where the matching string is found. If 
no matching string is found, the POS 
returns a value of zero that does not 
correspond to one of the allowable 
character positions in a STRING vari- 
able [see reference 1). 

PROGRAM POSITION; 
VAR PATTERN, TEXT : string; 
BEGIN 
PATTERN: = ' pal'; 
TEXT: = 'Solong,pal.." 
WRITELNf 'Position of ',PATTERN,' 
in ', TEXT, '=', POS (PATTERN, 
TEXT)); 
END. 

This function fails in Applesoft, so 
you need to write a short machine rou- 
tine, AMPER-POS, which gives the first 
occurrence of PATTERN in TEXT, but 
also gives the other occurrences (if any). 

The Routine 

AMPER-POS was designed to find 
the occurrences of a sub-string A$ in a 
string B$. There are two entry points: 

1 . The first entry point finds the first 
occurrence of A$ in B$ and has the 
format: 

& P ( A$,B$,C% ] 



where: 

A$ is the sub-string variable 

B$ is the string variable 

C% is the output integer variable 

2. The second entry point finds the 
other strings' occurrences and has 
the simple format: 

CALL 880 



System Requirement 

AMPER-POS is written in assembly 
language and can be run on a 16K, 32K, 
or 48K system with either disk or 
cassettes. The $300 (768 decimal) ad- 
dress has been chosen for ORG because 
the $300,$3FF memory range is avail- 
able for short machine-language pro- 
grams (see reference 2). 



Listing 1 












0800 


1 




PAG 






0800 
0800 
0800 


2 
3 
4 














*** 


*** 


0800 


5 






*** 


POSITION FUNCTION *** 


0800 


6 






*** 


(AMPER-POS) *** 


0800 


7 






*** 


BY *** 


0800 


8 






*** 


PHILIPPE FRANCOIS *** 


0800 


9 






*** 


*** 


0800 


10 










0800 


11 










0800 


12 










0800 


13 


AMPERPOS 


IS AN APPLESOFT ROM ROUTINE FOR BINDING OCCURENCES 


0800 


14 


OF A 


sua 


-STRING "PATTERN ,, IN A STRING "TEXT" 


0800 


15 










0800 


16 


ENTRY POINTS: 




0800 


17 










0800 


18 






1) FOR THE FIRST OCCURENCE: & P (AS,BS,C%) 


0800 


19 


WHERE: 






0800 


20 






AS-SUB STRING (PATTERN) 


0800 


21 






B$-STRING (TEXT) 


0800 


22 






C»»POSITION OF AS IN BS 


0800 


23 










0800 


24 


IT RETURNS: 




0800 


25 


A) ZERO IH C» IF AS 


IS NOT IN BS 


0800 


26 


B) THE FIRST CHARACTER POSITION WHERE 


0800 


27 


THE MATCHING STRING AS IS FOUND IN BS 


0800 


28 










0800 


29 






2) CALL 


880 FOR THE NEXT OCCURENCES OF AS IN BS 


0800 


30 










0800 


31 










0800 


32 


AMPERPOS 


USEAGE 




0800 


33 










0800 


34 I 


3EGINL 


EPZ 


500 


; EFFECTIVE STRING BEGINNING 


0800 


35 


3EGINH 


EPZ 


BEGINL+$01 




0800 


36 ^ 


4 


EPZ 


BEGINH+SOi 




"PATTERN" LENGTH 


0800 


37 1 


» 


EPZ 


M+S01 




"TEXT" LENGTH 


0800 


38 


TRL 


EPZ 


N+$01 




PTRL.H IS A POINTER 


0800 


39 


?TRH 


EPZ 


PTRL+$01 




TO THE STRING ADDRESS 


0800 


40 


[NDICJ 


EPZ 


PTRH+S01 




STARTING POSITION IN TEXT 


0800 


41 1 


1AG 


EPZ 


INDICJ+S01 




IF PATTERN IS FOUND IN TEXT 


0800 


42 










THEN FLAG=1 


0800 


43 










ELSE FLAG-0 


0800 


44 


APPLESOFT USEAGE 




0800 


45 










0800 


46 } 


CSAV 


EPZ 


$46 




0800 


47 \ 


rALTYP 


EPZ 


$11 




0-NUMBER FF-STRING 


0800 


48 C 


HKOPN 


EQU 


SDEBB 




CHECK THE "(" 


0800 


49 C 


NKCLS 


EOU 


$DEB8 




CHECK THE ")" 


0800 


50 C 


HKCOM 


EQU 


$DEBE 




CHECK THE "," 


0800 


51 I 


SRROR 


EQU 


$DD76 




"MISMATCH" ERROR 


0800 


52 C 


HRGET 


EQU 


S00B1 




0800 


53 I 


>TRGET 


EQU 


$DFE3 


; READ A VARIABLE AND FIND IT IN 


0800 


54 








: MEMORY(ON EXIT THE ADDRESS TO 


0800 


55 








; THE VALUE OF THE VARIABLE IN A,Y) 


0800 


56 










0300 


57 




ORG 


$300 




0300 


58 








(Continued) 
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Entering AMPER-POS 

To enter the program, type in the 
hex codes or instructions from the 
source listing with an assembler. To 
save the program, type: 

BSAVE AMPER-POS OBJ,A$300, 
L$BC (for disk) 

300-3BCW (for cassettes) 



Theory 

Suppose we want to find the first in- 
stance of the pattern string PAT- 
TERN! 1)...PATTERN(M) in the target 
string TEXT(1]..TEXT(N),M =N. 
(PATTERN(I) denotes the Ith character 
of PATTERN.) An obvious approach is 
to align PATTERN with the leftmost M 
characters at TEXT and start matching. 
When a mismatch occurs, shift PAT- 
TERN right one character and restart 
matching from its first position. Con- 
tinue until either PATTERN matches 
or there are no more characters to 
match in TEXT. 

The following algorithm that we 
use in the AMPER-POS program is the 
formal version of what has just been 
described (see reference 3 for more 
details): 

INTEGER i,j,m,n ; 
STRING pattem(l:m),text(l:n); 
i:=j: = l ; 

DO WHILE i < = m AND j < =n ; 
IF pattem(i) = text|j) THEN 
DO/*keep matching*/ 
i: =i + l;/*bump pattern position*/ 
j: = j + l;/*and text position*/ 
END 
ELSE 

DO / * backtrack * / 
j:-j + 2-i,- 
i:-l, 
END 
END 



Program Logic 

Here is a synopsis of the program 
logic: 

Lines 64-143 retrieve the parameters 
from the "&." statement. Applesoft 
ROM routines are used to reduce the 
length of the program. 

Lines 152-194 translate the precedent 
algorithm. Take the X and Y registers 
for the I and J indexes, but because AB- 
SOLUTE^ and INDIRECT, Y address- 
ing begin with the zero value for X and 
Y, the algorithm has been slightly 
modified. 



Listing 1 (C 


ontinued) 






0300 
0300 




60 
61 


* 


PARSING * 




0300 




62 


************************************************* 




0300 
0300 
0300 
0300 




63 
64 
65 
66 










VERIFY " P ( " 














0300 




67 








0300 


C9D0 


68 


CMP #"P" 


T CHECK THE "P" 




0302 


F003 


69 


BEQ *+5 






0304 




70 


PAG 






0304 


4C76DD 


71 


JMP ERROR 






0307 


20B100 


72 


JSR CHRGET 






030ft 


20BBDE 


73 


JSR CHKOPH 


; CHECK THE "(" 




030D 
030D 
03 0D 
030D 
030D 




74 
75 
76 
77 
78 










SEARCH "PATTERN" 














030D 


20E3DF 


79 


JSR PTRGET 






0310 


E611 


80 


INC VALTYP 






0312 


F003 


81 


BEQ STRG1 


; VALTYP EQUAL ZERO, IT IS 


A STRING 


0314 


4C76DD 


82 


JMP ERROR 






0317 




83 STRG1 : 






0317 


9504 


84 


STA PTRL 






0319 


8405 


85 


STY PTRH 






031B 


A000 


86 


LDY #$00 






03 ID 


B104 


87 


LDA (PTRL),Y 






031P 


8502 


88 


STA M 






0321 


C8 


89 


INY 






0322 


B104 


90 


LDA (PTRL).Y 






0324 


8500 


91 


STA BEGINL 






0326 


C8 


92 


INY 






0327 


B104 


93 


LDA (PTRL),Y 






03 29 


8501 


94 


STA BEGINH 






032B 
032B 




95 
96 
















032B 
032B 




97 
98 


REWRITE WE SUBSTRING "PATTERS" AT PATTRS ADDRESS 












032B 




99 








032B 


A0FF 


100 


LDY #$FF 






032D 


ca 


101 LABELl ISY 






032E 


B100 


102 


LDA (BEGINL) ,Y 






0330 


99BA03 


103 


STA PATTRS, Y 






0333 


C402 


104 


CPY M 






0335 


D0F6 


105 


BSE LABELl 






0337 




106 








0337 


20BEDE 


107 


JSR CHKCOM 






033A 




108 








033A 




109 












033A 
033A 




110 
111 


SEARCH "TEXT" 














033A 




112 


1 






033A 


20E3DP 


113 


JSR PTRGET 






033D 


E6U 


114 


IMC VALTYP 






033T 


F003 


115 


BEQ STR02 






0341 


4C76DD 


116 


JMP ERROR 






0344 




117 


3TRG3 l 






0344 


8 504 


118 


STA PTRL 






0346 


8405 


119 


STY PTRH 






0343 


AO00 


ISO 


LDY »90O 






034A 


B104 


121 


LDA (PTRL),Y 






034C 


8503 


123 


STA S 






034E 


C8 


123 


ISY 






034F 


B104 


124 


LDA (PTRL),Y 






03S1 


8500 


125 


STA BEGINL 






0353 


ca 


126 


ISY 






0354 


B104 


127 


L0A (PTRL),Y 






0356 


8501 


138 


STA BMISH 






0359 




129 


I 






0358 


20BWE 


130 


J8R CHKCOM 






035B 
Q35B 




131 
132 
















035B 

035B 




133 
134 


f SEARCH OUTPUT VARIABLE 












035B 




135 








035B 


20E3DF 


136 


JSR PTR0ET 






03SB 


A611 


137 


LDX VALTYP 






0360 


F003 


138 


BEQ 1ST 






0363 


1076D0 


139 


JSR ERROR 






0365 




140 


PAO 






0365 




141 


INT l 






0365 


8504 


142 


STA PTRL 






0367 


8405 


143 


STY PTRH 






0369 




144 


P 






0369 


20BBDE 


145 


JSR CHKCLS 






036C 
03 *C 




146 
147 














036C 
036C 




148 
149 


* 


RESOLVING * 










036C 




150 








036C 




151 


> Ii-REQ. X 






036C 




152 


1 Ji-REQ. Y 






036C 




153 








03 6C 


A900 


154 


LDA tSOO 


I INDICJi-0 




036E 


8506 


155 


STA IHDICJ 


P 




0370 
0370 
0370 
0370 




156 
157 
158 
159 


1 








1 SECOND EHTRY POINT 


CALL (ORO ADDRESS+563) 


(Continued, 
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Listing 1 


(Continued) 






1 


0370 


A200 


161 




LDX 


ISOO 


r ll«0 7 J l 'INDICJ 


0373 


8607 


163 




STX 


FLAO 




0374 


A 406 


163 




LDY 


INDICJ 




0376 




164 


1 








0376 




165 


BEOINi 








0376 




166 


1 








0376 


E403 


167 




CPX 


M 


1 DO WHILE I<-H AND J<-N 


0378 


F037 


168 




BEQ 


END 




037* 


C403 


169 




CPV 


N 




03 7C 


F033 


170 




BEQ 


END 




037E 


B100 


171 




LDA 


(BEOINLl.Y 




0380 


DDBA03 173 




CMP 


PATTRN.X 


I IF PATTBRN(I)-TEXT(J) THEN 


0383 


DOOB 


173 




BNB 


LABBL2 




038S 


A507 


174 




LDA 


FLAO 


1 IF PLAO-0 THEN 


0387 


D006 


175 




BNE 


LABELS 




0389 


A901 


176 




LDA 


tsoi 


> DO 


038B 


8S07 


177 




STA 


FLAO 


1 PLA0:"1 


038D 


8406 


178 




STY 


INDICJ 


1 INDICJ i -J 


038F 




179 


1 






1 END 


038P 




ISO 








> ELSE 


038? 




181 








1 DO 


038F 


E8 


183 


[ABEL3 


I NX 




t Il-I+l 


0390 


C8 


183 




INY 




1 Jl-J+1 


0391 




184 








1 END 


0391 


D0E3 


185 




BNE 


BEGIN 




0393 


CS 


186 


[ABEL2 


im 




1 ELSE 


0394 


8646 


187 




STX 


XSAV 


1 DO 


0396 


38 


188 




SEC 




1 Ji-J+3-I 


0397 


98 


189 




TYA 






0398 


GS46 


190 




SBC 


XSAV 




0391k 


AS 


191 




TAV 






039B 


MOO 


193 




LDX 


ISOO 


: Il«l 


039D 


8607 


193 




STX 


FLAO 


; FLAG 1-0 


039F 




194 








1 END 


039F 


PODS 


195 




BEQ 


BEOIN 




03A1 




196 








! END 


03A1 




197 










03 Al 
03A1 
03A1 
03A1 




198 
199 
200 

201 












END 


OF ALQORITM 














03A1 




202 


SNDi 








03A1 


A507 


203 




LDA 


FLAG 




03A3 


0004 


204 




BNE 


LABEL4 


; IP FLAQ-0 THEN 


03A5 


A9PP 


205 




LDA 


♦ SFF 


1 INDICJ :»0 


03A7 


8506 


206 




STA 


INDICJ 


; 


03 A9 




207 










03A9 




208 


ABEL4 


t 






03*9 


A506 


209 




LDA 


INDICJ 


; ELSE 


03 AB 




210 




PAG 






03 AB 


18 


211 




cue 




: INDICJ :-INDICJ+l 


03 AC 


6901 


212 




ADC 


tsoi 




03 KB 




213 










03 HE 
03 KB 




214 
215 












PUT 


INDICJ IN OUTPUT 


VARIABLE 


03 AE 
03 AE 




216 

217 




















03 AS 


A001 


218 




LDY 


#S01 




03 BO 


9104 


219 




STA 


(PTRL),Y 




03 B2 




220 










03 B2 
03 BJ 




221 
222 












FOR 


NEXT OCCURENCE : 


INDICJ :=INDICJ+M 


03 B2 
03B2 




223 
224 










18 




cue 






03 B3 


A506 


225 




LDA 


INDICJ 




03 BS 


6502 


226 




ADC 


M 




03 B7 


8506 


227 




STA 


INDICJ 




03B9 


60 


228 




RTS 






03BA 




229 










03BA 




230 


"ATTRN 








03BA 
03 BA 
03 BA 
03BA 
03C9 




231 
232 
233 
234 
235 












ROOM FOR A "PATTERN" 


STRING UP TO 15 CHARACTERS 






OFS 


15 




03C9 




236 










03C9 




237 


STOP: 









Figure 1 



"* EXAMPLE 1 *" 



4 PRINT TAB( 14); 

5 PRINT TAB( 14); 

6 PRINT TAB( 14); 
10 PRINT CHR5 (4)"BLOAD AMPER-POS .OBJ" 

20 POKE 1014,0: POKE 1015,3: REM FETCH THE "&" AMPERSAND 

30 A$ = "l":B5 = "THISIIS1AITEST" 

40 S, P(A$,B$,PO%) 

50 GOSUB 100 

60 CALL 880: GOSUB 100 

70 IF PO% < > THEN 60 

80 END 

90 REM PRINTING SUBROUTINE 

100 IF PO% = THEN PRINT : PRINT 

> " : RETURN 
110 PRINT : PRINT "THERE IS AN OCCURENCE OF 

";PO%;"TH POSITION": RETURN 



NO (OR NO MORE) OCCURENCE OF <";A$;" 
;A$;"> IN <";B$;"> AT TOE 

(Continued on next page) 



Lines 200-216 put the result of the 
search in the output variable (zero if 
the search is unsuccessful). 

Lines 221-225 prepare the INDICJ 
variable for the next searching. 

See figure 1 for an example of how 
to use AMPER-POS. 



If you save a name "SMITH", an 
address "3 1ST AV NY", and a phone 
number "333 444 555", on a mailing 
sequential file, you can use the se- 
quence shown in figure 2. 





Figure 2 


10 


PRINT "*************" 


20 


PRINT "* EXAMPLE 2 *" 


30 


PRINT "*************" 


40 


PRINT 


50 


D$ = CHR$ (4) 


60 


PRINT D$"OPEN MAIL" 


70 


PRINT D$ "WRITE MAIL" 


80 


PRINT "SMITH": 




PRINT "31ST AV N.Y." 




PRINT "333 444 5555" 


90 


PRINT D$ "CLOSE MAIL" 



But because it is better to have only 
one PRINT statement, we concatenate 
the three strings, separated with a "!". 
The statement 40 becomes: 

40 A$ = "SMITH !31 st AV NYI333 444 
555!" 

and statement 80 becomes: 

80 PRINT A$ 

so that figure 3 will look like: 





Figure 3 


10 


PRINT "*************" 


20 


PRINT "* EXAMPLE 3 *" 


30 


PRINT "*************" 


40 


A$ = "SMITH 131ST AV 




N.Y. 1333 444 55551" 


50 


D$ = CHR5 (4) 


60 


PRINT D$"OPEN MAIL" 


70 


PRINT D$ "WRITE MAIL" 


80 


PRINT A$ 


90 


PRINT D$ "CLOSE MAIL" 



And to re-read the three values we use 
the program in figure 4. 
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Figure 1 (Continued) 



TflERE rS AM OCCURENCE OF <1> IN <THIS 1 IS 1 Al TEST> AT THE 5TH POSITION 

THERE IS AN OCCURENCE OF <l> IN <THIS I IS 1 Al TEST> AT THE 8TH POSITION 

THERE IS AN OCCURENCE OF <l> IN <THIS 1 IS 1 A1TEST> AT THE 10TH POSITION 
NO (OR NO MORE) OCCURENCE OF <1> 



Figure 4 






10 D$ « CHR$ (4) 




15 PRINT D$"BIOAD AMPBR-POS.OBJ" 




16 POKE 1014,0: POKE 1015,3: REM LOAD 6, VECTOR 




20 PRINT D$"OPEN MAIL" 




30 PRIST D$"READ MAIL" 




40 INPUT B$ 




50 PRINT D$ "CLOSE MAIL" 




60 A$ = "1" 




70 t. P(A$,B$,PO») 




80 NA$ =■ MID$ (B?,l,PO* - 1):J = PO* + 1 




90 CALL, 880:AD$ =■ MIDS (B$,J,PO» - J): J = PO% + 1 




100 CALL 880:PN$ = MID$ (B$,J,PO* - J) 



RAPHTRIX'" 1 .3 

NEED 
HARD COPY OF YOUR APPLE 
HI-RES GRAPHIC? 

WITH 

GRAPHTRIX™1.3 

YOU CAN 

INSERT YOUR 

GRAPHIC 

ANYWHERE 

IN YOUR 

TEXT. 

USE ANY Of 

19 PRINTERS 

AND 

10 INTERFACE CARDS. 

Data Transforms Inc. 
616 Washington, Suite 106 
Denver, Colorado 80203 
(303) 832-1501 
Features: Graphic Magnification, 
Normal/Inverse, Page Centering, 
High and Low Crop Marks, Title String, 
Superscript, Footnotes, Chapters. Fully 
Menu Driven 

REQUIRES. Apple II with 48K. Applesoft 
in ROM, One Disk Drive with DOS 3.3. 

Apple is a Trademark o( Apple Compute* Inc. 

c Copyright 1982 Data Transforms Inc. All Rights Reserved. 

GRAPHIRIX is the Trademark ol Dora Transforms Inc . a division ol Sotarslahcs Inc 





EDITRIX 

CAN YOU SEE WHAT YOUR 
WORD PROCESSOR 
IS GOING TO PRINT? 

WITH 

EDITRIX 

YOUR TEXT WILL 

BE DISPLAYED 

AS IT 

IS TO BE 

PRINTED, 

UP TO 

220 COLUMNS 

Insert Graphics, 

Footnotes, Superscripts 

or Different Type Fonts 

Anywhere In Your Text 

These Features Plus Many More 

Are Right At Your Fingertips With 

EDITRIX'" 

Rom 

Data Transforms Inc. 

616 Washington, Suite 106 

Denver, Colorado 80203 (303) 832-1501 

REQUIRES: Apple II with 48K, Applesoft in ROM, 

DOS 3.3 and the GRAPHTRIX 1 .3 Matrix Graphics System. 

Aopte is a trademark of Apple Computer Inc. 

(c) Copyright 1982 Data Transforms. Inc. All Rights Reserved 

EOflRIX AND GRAPHIRIX are the trademarks of Data Transforms Inc., o division ol Salorstollcs Inc 
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VersaWriter 

DRAWING 
TABLET 




COMPLETE HARDWARE / SOFTWARE GRAPHICS SYSTEM - $299 



• Hi-Res & Med-Res Draw 

• Paint Brush-5 Sizes 

• Point to Point / Line Draw 

• Air Brush 



• Color Fill-In 

• Change Color Hue & Intensity 

• Reverse Picture 

• Scaling 



• Split / Full Screen 

• Save / Load / Erase 

• Text Writer 

• Fix X or Y Axis 



Requires: Atari ^00, 32K RAM, Basic Language Cartridge, Disk Drive 



GRAPHICS 
COMPOSER 

PADDLE / JOYSTICK 
GRAPHICS SOFTWARE - $39.95 

• Draw on Hi-Res Screens 7 or 8 

• Save Pictures on Disk or Cassette 

• Create Player/ Missile Shapes 
Automatically 

• Geometric Figures Program 

• Add Text to Screen 

Requires: Atari®800, 32K RAM, Basic Language Cartridge, 
Disk or Cassette 



GLOBE MASTER 

COMPLETE HI-RES 
GEOGRAPHY GAME - $29.95 

• 8 Hi-Res Color Maps 

• U.S.-Europe-World-Asia-Africa-Australia 

• Countries-Cities-Capitals-Oceans- 

Rivers-Mountains, Etc. 

• Several Skill Levels 

Requires: Atari <B 800, 32K RAM, Basic Language Cartridge, 
Disk 

ATARI is a registered trademark of Atari Inc. 



MIND BOGGLERS 



THREE STRATEGY GAMES 



• Capture 

• Mystery Box 

• Simon Says 



CASSETTE $15.95 DISK $19.95 

Requires: Atari®400, 16K RAM, Cassette 
Atari 800, 24K RAM, Cassette or Disk 



Uersa Computing, tnc 

3541 Old Conejo Road, Suite 104 
Newbury Park, CA. 91320 (805)498-1956 
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6809 Macros 
for Structured Programming 



by Hal Clark 



This article presents a technique 
for using assembler macros to 
allow structured assembly- 
language programming. The 
examples presented are for the 
6809, but they can be easily 
modified for other processors. 

Structured Macros 

requires: 

6809-based machine with 
macro assembler 
May be adapted to other 
processors 

Structured program development is 
defined as top down programming. 
When using this approach, the main 
body of the program is developed first, 
then each succeeding level is developed 
until the total program is finished. 
When the program is entered into the 
computer, it is usually entered in the 
same, top down, fashion. 

The newer structured languages, 
such as ADA, Pascal, and Modula, re- 
quire that constants, variables, and pro- 
cedures/functions (subroutines] be 
defined before use, thus giving the 
following program structure: 

PROGRAM name 
CONSTant definitions 
VARiable definitions 
FUNCTION definitions 
PROCEDURE definitions 
main program 

BASIC and machine language, how- 
ever, do not require that constants, var- 
iables, or subroutines be defined before 
use. Neither BASIC nor machine lan- 
guage requires program structuring. A 
lack of program structuring often re- 
sults in an excessive use of memory 
and an unreasonable amount of time 
devoted to debugging, and customer 
support. 

Pascal is a highly strucutred lan- 
guage that allows the systematic 



Listing 1 



* * 

* TITLE - MACRO. X09 * 

* AUTHOR! HAL CLARK * 

* ON-GOING IDEAS * 

* RD*1 BOX 810 * 

* STARKSBOROr VT 05487 * 

* * 
************************************************************************* 
************************************************************************* 



A MACRO TO DEFINE THE BEGINNING OF A PROGRAM 
IT NAMES THE PROGRAM FOR THE LINKER AND 
JUMPS TO THE LABEL <BEGIN>. 



* 

* PROG 
* 
* 

* K 

* EX, PROG TEST 
* 

************************************************************************* 
PROG MACR PNAME 

NAME PNAME 
JMP BEGIN 
EN DM 
PAGE 
************************************************************************* 



PARM - A MACRO TO PUSH PASSED PARAMETERS ONTO THE SYSTEM 

STACK, THE TYPE IS EXPECTED TO BE BYTE, WORD. REF, 
OR REG. 



«**««««*t:*«*«t**t:*«««««««*«*«««««*******)|l*********«*****4:4:4:*««4:4:4:4:4:««*«4:V 



BYTE 

WORD 

REF 

REGA 

R'EGB 

REGD 

REGX 

REGY 

REGU 

PARM 



JZZPOS 



ZZZPOS 



zzzpos 



ZZZPOS 



ZZZPOS 



EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

MACRO 

IF 

IF 

SET 

PSHS 

ELSE 

IF 

SET 

PSHS 

ELSE 

IF 

SET 

PSHS 

ELSE 

IF 

SET 

PSHS 

ELSE 

IF 

SET 

PSHS 

ELSE 

IF 

SET 

PSHS 

ELSE 

ERROR 

ENDIF 

ENDIF 

ENDIF 

ENDIF 

ENDIF 

ENDIF 



3 
1 
2 

3 

A 

5 

6 

VALUE, TYPE 

NARG.EQ.l 

VALUE. EQ. REGA 

ZZZPOS+1 

A 

VALUE. EO.REGB 

ZZZPOS+1 

B 

VALUE. EQ.REGD 

ZZZPOS+2 

D 

VALUE. EQ. REGX 

ZZZPOS+2 

X 

VALUE. EQ. REGY 

ZZZPOS+2 

Y 

VALUE. EQ. REGU 

ZZZPOS+2 

U 

INVALID ARGUMENT 



{Continued on next page) 
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development of computer programs. 
These programs are easy to debug and 
modify due to their structure. Unfor- 
tunately, not all applications can afford 
the overhead in memory usage and ex- 
ecution speed that many versions of 
Pascal require. The most transportable 
versions of Pascal compile the source 
code into some form of intermediate 
code, usually called P-code, which is 
then interpreted each time the program 
is run. 

The macros presented in this article 
allow structured development of 
machine-language programs. Programs 
developed using these macros appear to 
be a combination of Pascal and in-line 
assembly language. By using macros, 
the structure of Pascal may be combined 
with the execution speed and memory 
efficiency of assembly language. 

These macros generate machine 
code for the Motorola 6809 CPU. They 
are designed to be used with the Micro- 
tek 6809 cross-assembler, which is 
written in FORTRAN and available for 
most computers. The version used in 
the examples is running on a Digital 
Equipment Corp. PDP 11/34. 

Although these macros generate in- 
structions for a specific micro- 
processor, the ideas behind their design 
may be used to develop similar macros 
for other processors. Even if a macro 
assembler is not available, the ideas 
presented here can be used in machine- 
language programs to increase reliability 
and decrease development time. 

Implementation 

In this section we shall discuss the 
actual implementation of the macros, 
as well as some other aspects of struc- 
tured programming not required by the 
use of the macros. 

Macros, while allowing the program 
to have a structure similar to Pascal, do 
not actually require the same format 
(PROGRAM, CONSTANT, VARI- 
ABLE, FUNCTION, PROCEDURE, 
main program). However, most pro- 
grams are easier to understand with 
that structure, so all the examples will 
use it. 

The Stack Machine 

These macros and programs written 
using the macros define the 6809-based 
computer as a stack-oriented machine. 
The 6809 makes this implementation 
easy because of its two stack registers 
and many addressing modes that allow 
stack access. 



Listing 1 (continued) 



ELSE 
IF 
SET 
LDB 
PSHS 
ELSE 
IF 
SET 
LDB 
PSHS 
ELSE 
IF 
SET 
LDD 
PSHS 
ELSE 
IF 
SET 
LDD 
PSHS 
ELSE 
IF 
SET 
TFR 
ADDD 
PSHS 
ELSE 
ERROR 
ENDIF 
END IF 
ENDIF 
ENDIF 
ENDIF 
ENDIF 
ENDM 
PAGE 
*t*tttttttt*tttttt****t*tttt*****ttt*t*t*ttt*tt*t*tt*t**t******t*****t** 
* 

A MACRO TO CALL A SUBROUTINE WHILE PASSING UP TO 

SIX PARAMETERS. EACH PARAMETER MUST BE ENCLOSED 

WITH < > AND CONTAIN THE PROPER TYPE. 

EX. CALL TESTf<RAM,WORD>,<R0M,BYTE> 



ZZZPOS 



ZZZPOS 



ZZZPOS 



ZZZPOS 



zzzpos 



TYPE. EQ. BYTE 

ZZZPOS+1 

VALUE 

B 

TYPE.EQ.l 
ZZZPOS+1 
VALUE 
B 

TYPE.EQ.UORD 

ZZZPOS+2 

VALUE 

D 

TYPE.EQ.2 
ZZZPOS+2 
VALUE 
D 

TYPE.EQ.REF 

ZZZPOS+2 

U,D 

•VALUE 

D 

INVALID ARGUMENT 



CALL 



* 
* 
* 
* 
* 



DEST,P1,F2,P3,F4,P5,P6 



NARG.GT.l 

PI 

NARG.GT.2 

P2 

NARG.GT.3 

P3 

NARG.GT.4 

PI 

NARG.GT.5 

PS 

NARG.GT.6 

Pi 



CALL MACRO 
ZZZPOS SET 
IF 

PARM 
IF 

PARM 
IF 

PARM 
IF 

PARM 

IF 

PARM 

IF 

PSRM 

ENDIF 

ENDIF 

ENDIF 

ENDIF 

FiNDIF 

ENDIF 

JSR 

IF 

LEAS 

ENDIF 

ENDM 

PAGE 

* * 

* VAR - A MACRO TO DEFINE VARIABLES USED THROUGHOUT A PROGRAM. * 

* UP TO SIX VARIABLES MAY BE DEFINED AT ONCE. EACH * 

* VARIABLE MUST BE DEFINED AS A <NAME. LENGTH> PAIR. * 

V * 

EX. VAR <FIRST,BYTE>,<FLAG1>W0RD> * 

* 



DEST 
ZZZPOS 
ZZZPOS, S 



7 VAR 


MACRO 


LBL, SIZE 


LBL 


RES 
ENDM 


SIZE 


* 






VAR 


MACRO 


T1,T2,T3,T4,T5,T6 




IF 


NARG.GE.l 




ZVAR 


Tl 




ENDIF 






IF 


NARG.GE.2 




ZVAR 


T2 




ENDIF 






IF 


NARG.GE.3 




ZVAR 


T3 




ENDIF 
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NARG.GE. 

T5 



NARG.EQ.4 
T<4 



Listing 1 (continued) 

IF NARG.GE. 
ZVAR T4 
ENDIF 
IF 

ZVAR 
ENDIF 
IF 

ZVAR 
ENDIF 
ENDM 
PAGE 
************************************************************************* 

* * 

* CONS - A MACRO TO DEFINE PROGRAM CONSTANTS. UP TO SIX * 

* CONSTANTS MAY BE DEFINED AT ONCE USING THE STANDARD * 

* <NAME.VAL> PAIR DEFINITIONS. * 

* * 

* EX. CONS <TRUEf*1>f<FALSEf*0>f<MAYBE.*3> * 

* * 
************************************************************************* 
7C0NS MACRO LBL.VAL 

VAL 



LBL 



EC1U 
ENDM 



* 
CONS 



T1fT2fT3fT4.T5fT<4 

NARG.GE.l 

Tl 

NARG.GE.2 
T2 



MACRO 
IF 

ZCONS 
ENDIF 
IF 

ZCONS 
ENDIF 
IF 

ZCONS 
ENDIF 
IF 

ZCONS 
ENDIF 
IF 

ZCONS 
ENDIF 
IF 

ZCONS 
ENDIF 
ENDM 
PAGE 
************************************************************************* 



NARG.GE.3 
T3 



NARG.GE.4 
T4 



NARG.GE. 
T5 



NARG.EQ.6 
T<4 



LCONS 



A MACRO TO DEFINE PROCEDURE CONSTANTS. UP TO SIX 
CONSTANTS MAY BE DEFINED AT ONCE USING THE STANDARD 
<NAME.VAL> PAIR DEFINITIONS. THESE CONSTANTS ARE 
VALID ONLY FOR THE LIFE OF THE PROCEDURE. 



EX. 



LCONS <TRUEf*1>f<FALSEf*0>f<MAYBEf*3> 



************************************************************************* 
ZLCONS MACRO LBL f VAL 



LBL 


SET 


VAL 


* 
LCONS 


ENDM 




MACRO 


T1fT2fT3fT4fT5fT6 




IF 


NARG.GE.l 




ZLCONS 


Tl 




ENDIF 






IF 


NARG.GE.2 




ZLCONS 


T2 




ENDIF 






IF 


NARG.GE.3 




ZLCONS 


T3 




ENDIF 






IF 


NARG.GE.4 




ZLCONS 


T4 




END IF 






IF 


NARG.GE. 5 




ZLCONS 


T5 




ENDIF 






IF 


NARG.EQ.6 




ZLCONS 


T<4 




ENDIF 






ENDM 






PAGE 




************************************************************************* 


* 




* 


* 


PROC - 


A MACRO TO DEFINE PROCEDURE (SUBROUTINE) ENTRY POINTS * 


* 




COMPLETE WITH UP TO SIX PARAMETERS. NOTE IF DEFINED * 


* 




WITH X PARAMETERS EACH CALL MUST USE X ALSO. * 


* 




* 


* 


N 


T E - 1. THESE PARAMETERS ARE REFERENCED BY <PARM>fU * 


* 




IF THE PROCEDURE NEEDS TEMPS THEY SHOULD BE * 


* 

* 




ALLOCATED USING THE LVAR MACRO. * 

* 
2. REGS X 8 Y ARE AUTOMATICALLY SAVED * 


* 





************************************************************************* 

FP6R MACRO LBL. SIZE 

(continued) 



All data in the system, except for 
constants and variables defined in the 
main body of a program, are stored on 
the stack. Each procedure or function 
has the capability of receiving up to six 
passed parameters each time it is used. 
Procedures and functions also have a 
reserved area on the stack for their own 
use while active. When a procedure or 
function is finished, the area on the 
stack is given up so that the next 
subroutine may use it. This keeps the 
amount of "dedicated-all-the-time, 
used-some-of-the-time" memory to a 
minimum. Use of the stack also avoids 
the problems caused by using a com- 
mon variable at the wrong time. 

Register Usage 

The Motorola 6809 has five 16-bit 
registers, two 8-bit registers, and one 
16-bit accumulator that may be used as 
two 8-bit accumulators. The registers 
and their function within the defined 
stack machine follow: 

16-bit 
PC — program counter. Points to the 
next instruction to execute, and is 
only modified by the jump to sub- 
routine, return from subroutine, and 
the various branch instructions. 

S — system stack pointer. Must be 
initialized at the start of a program. 
This register should not be changed 
by the user program as it contains the 
necessary information to switch be- 
tween subroutines. 

U — user stack pointer. Data that is 
passed to a called subroutine may be 
found in this stack, and is referenced 
by an offset from this register. The 
value stored in U should never be 
changed by the user; the macros 
CALL and RETURN will alter U as 
necessary. 

X — a general purpose register 
available to the user program. This 
register is saved and restored by the 
macros. 

Y — a general purpose register 
available to the user program. This 
register is saved and restored by the 
macros. 

8-bit 

DP — direct page register. Unused by 
the stack machine. 

CC — condition code register. This 
contains flags pertaining to the 
results of the last instruction. This 
register is not saved by the macros. 
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Accumulator D (A and B) 

Accumulators A and B are each 8 
bits. Accumulator D is 16 bits, con- 
sisting of the A and B accumulators. 
These registers are considered tem- 
porary and will be modified by the 
stack machine whenever a sub- 
routine is called. 

Reserved Symbols 

The following symbols are re- 
stricted to reference only, and must not 
be redefined by the user's program: 
BYTE used to represent a length of 8 
bits. 

WORD used to represent a length of 
16 bits (2 bytes]. 

REF used when passing parameters 
between subroutines. 

REGA used to pass the machine 
register A. 

REGB used to pass the machine 
register B. 

REGD used to pass the machine 
registers A and B. 

REGX used to pass the machine 
register X. 

REGY used to pass the machine 
register Y. 

The Macros 

The following paragraphs describe 
the available macros, their uses, calling 
parameters, and an example. 

PROG xxxx 

PROG: This macro expects one para- 
meter that will name the^rogram. The 
macro causes a jump to the symbol BE- 
GIN, which should be placed on the first 
line of the main body of the program, 
ex. PROG TEST 

CALL xxx, <P1,TP>,...,<P6,TP> 

CALL: Performs the jump to sub- 
routine xxx after all the optional passed 
parameters are placed on the stack, 
ex. CALL COPY, <FROM, WORD >, 
<TO,WORD>,<LEN,BYTE> 

VAR <N1,TP>,...,<N6,TP> 

VAR: Defines variables that will be used 
throughout the program, not just with- 
in subroutines. 

ex. VAR < FLAG, BYTE>,< TEMPI, 
WORD> 

CONS <N1, VI >,..., <N6,V6> 



Listing 1 (continued) 



LBL 


SET 


ZZZPOS 




ZZZPOS 


SET 


ZZZPOS+SIZE 




* 

SAVE 
* 
PROC 


ENQM 






EtJU 


1 




MACRU 


NA.F1.F2.F3.F4.F; 


»F6 


NA 


EOU 


* 


PROCEDURE NAME 


ZZ7FNC 


SET 





TELL RETURN NO FARMS TO PASS 


77ZENV 


SET 







ZZZSAV 


SET 


1 






IF 


NARG.GT.l 


PASSING PARAMETERS ? 




PSHS 


U.X.Y 


YES - SAVE X.Y.U RESET S 




LEAU 


4.S 




ZZZENV 


SET 


1 


SHOUTHAT THEY MUST BE CLEANED 


ZZZPOS 


SET 


4 


FROM THE STACK, 




IF 


NARG.GT.2 






IF 


NARG.GT.3 






IF 


NARG.GT.4 






IF 


NARI3.GT.5 






IF 


NARG . GT . 6 






FPAR 


F6 






ENIIIF 








FPAR 


F5 






ENDIF 








FPAR 


F4 






ENDIF 








FPAR 


F3 






ENCIF 








FPAR 


F2 






ENDIF 








FPAR 


Fl 






ELSE 




NO PARAMETERS PASSED - SAVE X.Y 




PSHS 


X.Y 






ENDIF 






ZZZPOS 


SET 

ENDM 

PAGE 


-4 




************************************************************************* 


* FPROC - 


A MACRO TO DEFINE 


PROCEDURE (SUBROUTINE) ENTRY POINTS * 


* 




COMPLETE UITH UP 


TO SIX PARAMETERS. NOTE IF DEFINED * 


* 
* 
* 




WITH X PARAMETERS 


EACH CALL MUST USE X ALSO. * 


N 


* 
T E - 1. THESE PARAMETERS ARE REFERENCED BY <PARM>,U * 


* 




IF THE PROCEDURE NEEDS TEMPS THEY SHOULD BE * 


* 

* 
* 




ALLOCATEI 


USING THE LVAR MACRO. * 

* 
( Y ARE NOT SAVED * 




2. REGS X 


************************************************************************* 


FPRCIC 


MACRO 


NA.F1.F2.F3.F4fF 


5.F6 


NA 


EOU 


* 


PROCEDURE NAME 


ZZZFNC 


SET 





TELL RETURN NO FARMS TO PASS 


ZZZENV 


SET 







ZZZSAV 


SET 





NOT SAVING REGS X.Y 




IF 


NARG.GT.l 


PASSING FARMS? 




PSHS 


U 


YES - SAVE U 




LEAU 


O.S 


NO - DO NOTHING 


ZZZENV 


SET 


1 


THAT THEY MUST BE CLEANED 


ZZZPOS 


SET 


4 


FROM THE STACK. 




IF 


NARG.GT.2 






IF 


NARG.GT.3 






IF 


NARG.GT.4 






IF 


NARG.GT.5 






IF 


NARG.GT.6 






FPAR 


F6 






ENDIF 








FPAR 


F5 






ENDIF 








FPAR 


F4 






ENDIF 








FPAR 


F3 






ENDIF 








FPAR 


F2 






ENDIF 








FPAR 


Fl 






ENDIF 






ZZZPOS 


SET 

ENDM 

PAGE 







************************************************************************* 


* 


FUNC - 


A MACRO TO DEFINE 


FUNCTION (SUBROUTINE) ENTRY POINTS * 


* 




COMPLETE UITH UP 


TO SIX PARAMETERS. NOTE IF DEFINED * 


* 




UITH X PARAMETERS 


EACH CALL MUST USE X ALSO, * 


* 
* 
* 




BY DEFINITION A FUNCTION RETURNS A SINGLE VALUE. * 

* 
DTE - 1. THESE PARAMETERS ARE REFERENCED BY <PARM>.U * 


N 


* 




IF THE FUNCTION NEEDS TEMPS THEY SHOULD BE * 


* 
* 
* 




ALLOCATED 


USING THE LVAR MACRO. * 

* 
( Y ARE SAVED. * 




2. REGS X 



************************************************************************* 

FUNC MACRO NA.F1.F2.F3.F4.F5.F6 

NA EQU * FUNCTION NAME 
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7ZZFNC 


SET 


1 






ZZZENV 


SET 









ZZZSAV 


SET 


1 








IF 


NARG 


GT 


1 




PSHS 


UiX.Y 






LEAU 


4.S 






ZZZENV 


SET 


1 






ZZZPOS 


SET 


4 








If" 


NARG 


GT 


2 




IF 


NARG 


GT 


3 




IF 


NARG 


GT 


4 




IF 


NARG 


GT 


5 




IF 


NARG 


GT 


6 




FPAR 


F6 








END IF 










FPAR 


F5 








ENDIF 










FPAR 


F4 








ENDIF 










FPAR 


F3 








ENDIF 










FPAR 


F2 








ENDIF 










FPAR 


Fl 








ELSE 










PSHS 


X.Y 








ENDIF 








ZZZPOS 


SET 

ENDM 

PAGE 


-4 







TELL RETURN NO PARMS TO PASS 



PASSING PARAMETERS T 

YES - SAVE X.Y.U RESET S 



THAT THEY MUST BE CLEANED 
FROM THE STACK. 



SAVE X.Y 



*********************************************************************** 

FFUNC - A MACRO TO DEFINE FUNCTION (SUBROUTINE) ENTRY POINTS 
COMPLETE WITH UP TO SIX PARAMETERS. NOTE IF DEFINED 
WITH X PARAMETERS EACH CALL MUST USE X ALSO. 
BY DEFINITION A FUNCTION RETURNS A VALUE. 

* 

NOTE - 1. THESE PARAMETERS ARE REFERENCED BY <PARM>.U » 

IF THE FUNCTION NEEDS TEMPS THEY SHOULD BE * 

ALLOCATED USING THE LVAR MACRO. * 

2. REGS X I Y ARE NOT SAWED ' 

if**********************************************************************- 



FFUNC 


MACRO 


NA.F1.F2.F3.F4.F5.F6 




NA 


EQU 


* 


FUNCTION NAME 


ZZZFNC 


SET 


1 


TELL RETURN NO PARMS TO PASS 


777.ENV 


SET 







ZZZSAV 


SET 





NOT SAVING REGS X.Y 




IF 


NARG.GT.l 


PASSING PARMS? 




PSHS 


U 


YES - SAVE U 




LEAU 


O.S 


NO - DO NOTHING 


ZZZENV 


SET 


1 


THAT THEY MUST BE CLEANED 


7Z7P0S 


SET 


4 


FROM THE STACK. 




IF 


NARG.GT.2 






IF 


NARG.GT.3 






IF 


NARG . GT . 4 






IF 


NARG.GT.5 






IF 


NARG.GT.A 






FF'AR 


F6 






ENDIF 








FPAR 


F5 






ENDIF 








FPAR 


F4 






ENDIF 








FPAR 


F3 






ENDIF 








FPAR 


F2 






ENDIF 








FPAR 


Fl 






ENDIF 






ZZZPOS 


SET 

ENDM 

PAGE 








*********************************************************************** 

LVAR - A MACRO TO DEFINE TEMPORARY VARIABLES FOR A PARTICULAR 
PROCEDURE OR FUNCTION. THE TEMPS ARE ALLOCATED ON THE 
SYSTEM STACK AND ARE REFERENCED BY <TEMP>,U. THESE 
VARIABLES ARE DISTROYED UPON EXIT OF THE PROCEDURE. 

EX. 

LVAR <T1,BYTE>.<T2,W0RD> 

LDD T2.U 

* 
************************************************************************ 
PAR MACRO LBL.SIZE 
ZZZPOS SET ZZZPOS-SIZE 
LBL SET ZZZPOS 
ENDM 



(continued) 



CONS: Defines constants that will be 

used throughout the program. 

ex. CONS < TRUE, 1>,< FALSE, 0>, 

<MAYBE,3> 

LCONS <N1,V1 >,..., <N6,V6> 

LCONS: Defines local constants that 
are used within the current subroutine 
definition only, 
ex. LCONS <TAB,9>,<CRLF,13> 

PROCxxx,<Pl,TP>,...,<P6,TP> 

PROC: Defines a procedure (sub- 
routine) . PROC must be followed by a 
RETURN before the next PROC or 
FUNC macro usage, xxx gets assigned 
to the entry point of the procedure. The 
parameters P1-P6 get assigned as offsets 
on the stack to allow referencing of the 
passed parameters at execution, 
ex. PROC COPY, <IN, WORD >, 
< OUT, WORD > , < LEN,BYTE > 

FUNC xxx, <P1,TP>,...,<P6,TP> 

FUNC: Defines a subroutine that 
returns a value (function). This macro, 
like PROC, must be followed by the 
RETURN macro before the next FUNC 
or PROC macro is used. The name xxx 
is assigned to the entry point of this 
subroutine and the labels P1-P6 are 
assigned as offsets to the stack for ac- 
cess to the passed data during execu- 
tion. The results of the function are 
returned in machine register D. 
ex. FUNC SQR,<VAL,WORD> 

LVAR <N1,TP >,..., <N6,TP> 

LVAR: Defines up to six local variables 
at one time. These variables can only 
be referenced within the definition of 
this defining subroutine. Subroutines 
called from within defining sub- 
routines may reference these variables 
only if passed to the subroutine as a call 
parameter. LVAR, at this time, requires 
parameters to be passed to the defining 
subroutine to function properly, 
ex. LVAR <TEMP1,BYTE>, 
<TEMP2,WORD> 

RETURN data 

RETURN: Ends the previous FUNC- 
tion or PROCedure definition. It 
removes temporary variables as well as 
passed parameters from the stack, re- 
stores the saved registers, and returns 
to the calling program. If the RETURN 
is from a function, it also places the 
returned value in the machine register D. 
ex. RETURN RESLT (from a function) 
ex. RETURN [from a procedure) 

The author may be contacted at On-Going 
Ideas, RD #1, Box 810, Starksboro, 
Vermont 05487. 
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1 Mhz- 12 Bit A/D 

for your Apple II Computer 

The APPLESC0PE-HR1 2 analog to digital converter uses 
a high stability buried zenervoltage reference and a flash 
A/D to give 1 2 bit accuracy with a 1 4 bit dynamic range. 

• DC to t Mhz Programmable Sample Rate 

• 2048 Sample Butler Memory 

• Pretrigger Viewing 

• Continuous or Single Sweep 

• 4 Channel Software Support 
(requires additional power supply) 

• External Trigger Input 

The standard software provided with each APPLESCOPE- 
HR 1 2 includes all of the functions necessary to turn your 
Apple II computer into a high quality digital storage 
oscilloscope. In additionall of theSCOPEDRIVERoptions 
are being up-graded to handle the higher resolution data. 
Price per cnannei 9695 



The original APPLESCOPE still provides the optimum 
price/performance trade off for those users requiring 8 bit 
converter resolution. 

APPLESCOPE INTERFACE 




rRHCt ft 



• 0C to 3.5 Mhz sample rate 

• 1024 byte buffer memory 

• Pretrigger Viewing 

• Programmable Scale Select 

• Continuous and Single Sweep Modes 

• Single or Dual Channel Trace 

Price for the two board Applescope system is $595 
EXTERNAL TRIGGER ADAPTER $29 



SCOPE DRIVER Advanced software torthe APPLESCOPE 
analog to digital converters makes full use of the computing 
power of the Apple II to create a total data acquisition 
system. Available options include: 

• Signal Averaging-Acquires 1 to 999 signal sweeps and 
displays the averaged result. 

• Digital Volt Meter- Allows use as real time DVM or use to 
measure points on an acquired sweep. 

• Disk Storage - Allows automatic storage and recover of 
acquired data on floppy disks. 

• Spectrum Analyzer-Calculates and displays frequency 
spectrum of acquired data. 



r 





BUS RIDER 
LOGIC ANALYZER for the APPLE II 

The BUS RIDER circuit card silently rides the Apple II 
peripheral bus and allows real time tracking of program 
flow. Software provided allows set up of trace parameters 
from the keyboard and read back of disassembled code 
after a program has been tracked. 

• 32 bit by 5 1 2 sample memory buffer 

• Monitors Data and Address bus plus 8 external inputs 

• Trigger on any 32 bit word or external trigger 

• Pretrigger viewing 

The BUS RIDER is an invaluable development tool for 
anyone working with Apple II or Apple 11+ computers. 

Price $395 



RC ELECTRONICS INC. 

7265 Tuolumne Dr., Goleta, CA 931 1 7 
m {805)968-6614 



Listing 1 (continued) 



LVAR 


MACRO 


yify2.y3.y4fy5.W4 




IF 


ZZZENW.EQ.O 


ZZZENV 


SET 


-1 




PSHS 


U 




LEAU 


O.S 


ZZZPOS 


SET 
ENDIF 







IF 


NARG.GE.l 




DPAR 


yi 




IF 


NARG.GE.2 




DPAR 


V2 




IF 


NARG.GE.3 




DPAR 


V3 




IF 


NARG.GE.4 




DPAR 


V4 




IF 


NARG.GE.S 




DPAR 


V5 




IF 


NARG.GE.4 




DPAR 


V6 




ENDIF 






ENDIF 






ENDIF 






ENDIF 






ENDIF 






ENDIF 






LEAS 


ZZZPOSfU 




ENDM 






PAGE 





* 
RETURN - A MACRO TO DEALLOCATE PASSED PARAMETER STACK SPACE 
UPON THE COMPLETION OF A FUNCTION OR PROCEDURE. 



NOTE- FUNCTION WILL RETURN A VALUE IN REGA OR REGD 
THIS VALUE IS SPECIFIED IN THE RETURN CALL. 



* 
* 

* 
* 
* 

RETURN MACRO VAL. TYPE 

ZZZFNC.EQ.l FUNCTION RETURN? 

NARG.EQ.O YES - BUT NO PARMS< ERROR) 

FUNCTION MUST RETURN A VALUE! MM! 



EX. 



RETURN <Tl,U>.W0Rn 



IF 

IF 

ERROR 

ELSE 

IF 

IF 

ELSE 
IF 

ELSE 

IF 

TFR 

ELSE 

IF 

TFR 

ELSE 

IF 

TFR 

ELSE 

ERROR 

ENDIF 

ENDIF 

ENDIF 

ENDIF 

ENDIF 

ELSE 

IF 

ERROR 

ELSE 

IF 

LDA 

ELSE 

IF 

LDD 

ELSE 

ERROR 

ENDIF 

ENDIF 

ENDIF 

ENDIF 

ENDIF 

ELSE 

IF 

ERROR 

ENDIF 

ENDIF 



NARG.EQ.l 
VAL.EQ.REGA 



VAL.EQ.REGD 



VAL.EQ.REGB 
BfA 



VAL.EQ.REGX 
X.D 



VAL.EQ.REGY 
Y.D 



YES - MAYBE A REG IS RETURNED 
REGA ? 
A=A 

REGD ? 
D=D 

REGB ? 
A=B 

REGX ? 
D=X 



REGY ? 
D=Y 



INVALID RETURN ARGUMENT 



NARG.NE.2 

INVALID RETURN ARGUMENT 



TYPE. EQ. BYTE 
VAL 



TYPE. EQ. WORD 
VAL 



INVALID RETURN ARGUMENT 



MORE THAN 1 RETURN ARG? 

RETURNING A BYTE? 
A=VAL 

RETURNING A WORD? 
0=VAL 



NARG.NE.O 

PROCEDURES DO NOT RETURN VALUES! ! ! 



END OF SPECIAL FUNCTION RETURN LOGIC 
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Listing 1 (continued) 



ZZZFNC SET 





IF 


ZZZENV.LT.O 


LEAS 


OiU 


PULS 


U 


IF 


ZZZSAV 


PULS 


X.Y 


ENDIF 




ELSE 




IF 


ZZZENV.GT.O 


IF 


ZZZSAV 


LEAS 


-4tU 


PULS 


UfXtY 


ELSE 




LEAS 


OtU 


PULS 


U 


ENDIF 




ELSE 




IF 


zzzsav 


PULS 


XfY 


ENDIF 




ENDIF 




ENDIF 




RTS 




ENDM 




PAGE 





************************************************************************ 

* * 

* RECORD DEFINITION MACROS « 

* * 
************************************************************************* 
RECORD MACRO 



ZZZPOS 


SET 







ENDM 




FIELD 


MACRO 


NAME t SIZE 


NAME 


EQU 


ZZZPOS 


ZZZPOS 


SET 
ENDM 


ZZZPOS+SIZE 


RECSIZ 


MACRO 


SIZE 


SIZE 


EQU 

ENDM 

PAGE 


ZZZPOS 



MM******************************************************************* 

TABLE GENERATION MACROS 

EACH TABLE MUST CONSIST OF: 

TABLE - TABLE HEADER (1) 

TABDTA - TABLE DATA ENTRIES (N) 

TABSIZ - TABLE LENGTH AND END MARKER (1) 

*********************************************************************** 
ABLE MACR 



ZZZTBL 


SET 
ENDM 





* 






TABDTA 


MACR 


VALUE t TYPE 




IF 


TYPE. EQ. BYTE 




DATA 


VALUE 


ZZZTBL 


SET 
ELSE 


ZZZTBL+1 




IF 


TYPE. EQ. WORD 




ACON 


VALUE 


ZZZTBL 


SET 
ELSE 


ZZZTBL+2 




ERROR 


UNSPECIFIED 




ENDIF 






ENDIF 






ENDM 




* 






TABSIZ 


MACR 


SIZE 


SIZE 


EQU 


ZZZTBL 




DATA 


♦ FF 




ENDM 






PAGE 





************************************************************************ 

* 

STORE A STRING (MUST BE USED WITHIN A PSCTt OUTSIDE EXECUTABLE CODE) 
THE PARAMETER IS THE STRING ENCLOSED IN SINGLE QUOTESt AS WELL AS 
ANGLE BRACKETS t IF NECESSARY. * 

* 
************************************************************************ 



MAKSTR 


MACRO 


XS 


ZZZSVS 


SET 


* 




ORG 


*+l 




FCC 


XS 


ZZZSTft 


SET 


* 




ORG 


ZZZSVS 




FCB 


ZZZSTR-ZZZSVS 




ORG 


ZZZSTR 




ENDM 
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AJCftO 



A harvest of 
savings from 




Apple^^Bree 
Electronics 



SOFTWARE 



APPLE. ATARI' TRS80 • IBM 

A full line of software for business, games 
and education lip to 35% off! 



MUSE 


KJS 


V1SICORP 


STONEWARE 


ON LINE 


SYNERGISTIC 


EEXJ-WARE 


HAYDEN 


HOWARD 


AND MANY MORE 



HARDWARE 



AMDEK . HAYES • MICROSOFT 

List Our Price 

32K RAM card $293.00 $205.00 
Video Term $345.00 $279.00 



Lazer Products 20% off 



DISKS 



Maxell 
Verbatim 



BoxoflO,5'/ 4 ",SS-DD $35.00 
BoxoflO,5Va",SSDD $29.00 



MONITORS 



LE MONITORS 

9" Green 
12" Green 
ZENITH 

12" Green 



List 



$189.00 
$199.00 



Our Price 
$159.00 
$169.00 



$179.00 $129.00 



Plus a full line of AMDEK Monitors 



PRINTERS 



PAPER TIGER 

460G 
560G 
EPSON 

MX 70 

MX80FT 

MXI00FT 



Ust 



$1,094.00 
$1,394.00 

$449.00 
$745.00 
$945.00 



Our Price 
$950.00 
$1,250.00 

$395.00 
$595.00 
$795.00 



CALL FOR THIS MONTHS SPECIAL ! 



1-800-835-2246 EXT. 21 1 

OR 

702-452-5589 



5130 East Charleston Blvd. 

Suite 5MI 
Las Vegas, Nevada 891 22 



i^SS^S 



Phone orders welcome. Mail orders may send 
charge card number (include expiration date), 
cashiers check, money order or personal check 
(allow ten business days for personal or com- 
pany checks to clear). Add 53.00 for shipping, 
handling and insurance. Mevada residents add 
5.75% sales tax. Please include phone number. 
All equipment is in factory cartons with manu- 
facturers warranty. Equipment subject to price 
change and availability. Call or write for price list. 
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m 




ATARI 



400 

16K ... s 269 
32K . . . s 389 
48K . . . s 489 

410 Recorder $76.00 

810 Disc Drive $449.00 

822 Printer $269.00 

825 Printer $589.00 

830 Modem $1 59.00 

820 Printer $259.00 

850 Interlace $169.00 

CX40 Joy Stick $18.00 

CX853 16K RAM $77.95 



. HOT ATARI- 
JK GAMES JK 

PAC-MAN $35.00 

Centipede $35.00 

Cevems of Mars $32.00 

Asteroids $29.00 

Missile Command $29.00 

Star Raiders $39.00 

I Canyon Climber $25.00 

Protector $24.00 

Mouskattack $31.00 

Jawbreaker $27.00 

Ghost Hunter $24.00 




800 



16K . . . s 649 
32K . . . $ 724 
48K . . . $ 769 

Microtek 16K RAM $74.95 

Microtek 32K RAM $119.95 

Ramdisk (128K) $429.95 

Intec 48K Board $219.95 

Intec 32K *"9-95 

One year extended warranty $70.00 

481 Entertainer $69.00 

482 Educator $130.00 

483 Programmer $49.00 

484 Communicator $344.00 



KBYTE 

ROM CARTRIDGE GAMES 
FOR YOUR ATARI 

Kraiy Shoot Out $39.00 

K-razy Kritters $39.00 

K-razy Antics $39.00 

K-star Patrol $39.00 

STICK STAND 
sga* 

ARCADE ACTION FROM YOUR 
ATARI JOYSTICK 




Telecommunications 

Modems 

Hayes 

Smart $239.00 

Chronograph S199.00 

Micromodem II $279.00 

Micromodem 100 $309.00 

Novation Auto $239.00 

D Cat $169.00 

Cat $159.00 

Anchor Modem $79.00 



AMDEK 
MONITORS 

300G $169.00 

Color I $339.00 

Color II $699.00 

Color III $429.00 

OTHERS 

Zenith 9 " (Green) $1 19.00 

BMC 12" Green $85.00 



VISICORP 

VISICALC 

Apple II + $189.00 

Atari $189.00 

Commodore $189.00 

IBM $189.00 

Also available are: 
V1SIDEX VISIPLOT 

VTSIF1LE VISITERM 

VISIPACK VISITREND 



SOFTWARE 

We stock manufacturer's and third party software 
for most all computers on the market! Call today 
lor a copy of our new 

CATALOG 

You'll find programs by Atari, APX, Data Soft 
Crystal Soltware, EPYX, Synapse, OnLine, Arcade 
Plus, K-BYTE, Magls, Canadian Micro Professional 
Soltware, Creative Soltware, BPI, VISICORP, Com- 
modore, NEC and of course our own! 



FRANKLIN 
ACE 1000 




64K Personal Computer 

Hardware, software and 

peripheral compatable with the 
Apple II and even has some fea 
tures not found on the Apple. 

Call now for best price!! 



PERGCM 



Finally, a dual disk drive for 
the Atari 800/400. Both single 
and dual drive models read 
both sides of the disk! Will 
read all disks written for Atari 
810. CALL FOR INTRODUCT- 
ORY PRICE! 




NEC 

COMPUTERS 

8001-A $749.00 

8031 S749.00 

8012 $549.00 

PRINTERS 

8023 $549.00 

7710/7730 $2399.00 

3510/3530 $1789.00 

MONITORS 

JB-1201 $179.00 

JC-1201 $349.00 

JC-1202 $899.00 



Maxell Disks 

MO I (box ol 10) $36.( 

MDII(boxol 10) $46.( 

MFD I (8") $44.( 

MFD II (8* Double Density) $54.( 

Syncom (box ol 10) $29.( 

Computer Covers 

Commodore VIC-20 $6.99 

Atari 400 $6.99 Commodore 8032 $14.99 

Atari 800 $6.99 Commodore 

Atari 810 $6.99 8050/4040 $10.99 



west 



I In Nevada 
CALL 
1(702)588-5654 



8QQ- 648- 




n 



P.O. Box 66f 
Statelin 
NV.894<! 



What HEWLETT 
mL'HM PACKARD 




HP* 85 



5 1969 



HP'87 $1799.00 

HP«12S $1999.00 

HP«85 16K Memory Module $169.00 

5V." Dual Master Disc Drive $1799.00 

Hard Disk w/ Floppy $4349.00 

Hard Disk $3549.00 

"Sweet Lips" Plotter $1199.00 

90 Column Printer $649.00 



m 




HEWLETT 
PACKARD 

HP41CV 

CALCULATOR 

$ 239 



HP 41C $189.00 

HP11C $79.00 

HP 12C $114.00 

NEW15C $119.00 

NEW 16C $125.00 

HPIL PERIPHERALS IN STOCK! 



fjVf^ EPSON 
PRINTERS 

MX 80 w/Graftrax $449 

MX 80 FT III CALL 

MX 100 CALL 

ADA 1600 Parallel Printer to CBM $119.00 

ATC-1 Parallel Printer to Atari $29.00 

AP-80 Apple Parallel Card & Cable $69.00 

IBM-1 Parallel Printer to IBM $32.00 




In-stock items shipped same day 
you call. No risk, no deposit on 
C.O.D. orders. Pre-paid orders 
receive free shipping within the 
continental United States with no 
waiting period for certified checks 
or money orders:- All prices shown 
are cash prices. Add 3% for 
Mastercard and Visa. NV and PA 
residents add sales tax. All items 
subject to availability and price 
change. 




CBM 8032 

s 999 



fr 



WordPro5 + $319.00 

Word Pro 4 +■ $299.00 

Word Pro 3+ $199.00 

The Administrator $379.00 

InloPro Plus $219.00 

Power $79.00 



Televideo 
Terminals 




910 $579 

912C $699 

920C $749 

925C $749 

960 $939 

B02 SCali 

802H $Call 

816 $Call 

806 $Call 




CITOH 



_ PRINTERS 

F10-40CPS $1439.00 

F10-55CPS CALL 

Prowriler $499.00 

ADA 1450 Serial Printer to CBM $139.00 

ATC-2 Serial Printer to Atari $29.00 

APS10 Apple Serial Card & Cable $95.00 



CENTRONICS 
PRINTERS 

739-1 $519 

739-3 $619 

2 Meter RS232RS232 Cables $29.95 

- ALSO - 

Diablo 630 Special $1799.00 

Talley B024L $1629.00 

IDS Prism CALL 



Commodore 

Business Machines 

CBM 64 CALL 

4032 $969.00 

8096 Upgrade Kit $369.00 

Super Pet $1599.00 

2031 $529.00 

8250 Doubled Sided Disk Drive $1699.00 

D9090 5 Megabyte Hard Disk $2399.00 

D9090 7.5 Megabyte Hard Disk $2699.00 

8050 $1299.00 

4040 $969.00 

8300 (Letter Quality) $1799.00 

8023 $769.00 

4022 $499.00 

Pet to IEEE Cable $37.00 

IEEE to IEEE Cable $46.00 

Tractor Feed for 8300 $240.00 



VIC 20 
$ 239 




VIC 1530 Commodore Oatassette $69.00 

VIC 1540 Disk Drive $499.00 

VIC 1515 VIC Graphic Printer $339.00 

VIC 1210 3K Memory Expander $32.00 

VIC 110 8K Memory Expander $53.00 

16K VIC Expansion $94 00 

VIC 1011 RS232C Terminal Interface $43.00 

VIC 112 VIC IEEE-46B Interface $86 00 

VIC 1211 VIC 20 Super Expander $53.00 

VIC Mother Board $99.00 



Smith-Corona 




Letter Quality 

Daisy Wheel 

12 CPS Text Printer 



OKI DATA 
PRINTERS 

82A $489.00 

83A $729.00 

84 $1099.00 



NOTE 

All of the above OKIOATA Printers come equiped 
with both parallel ports & RS232 Serial ports. 



800- 



477 E. 
THIRD ST. 
Williamsport 
PA 17701 




H 






DISK II 
GABLES 



[long replacements up to 20 feet] 



These NON-shielded cables are replacements, NOT 
extensions, and are tested seven different ways to 
insure reliability that can't be acquired with 
extensions. These cables are available in one foot 
increments up to 20 feet long. 

Price varies with the length you require. The most 
popular length is four (4) feet long at $25.95. Add $1 .50 
per foot for additional length. (Shorter cables available 
also). 

OROER FROM: 

Master Manufacturing • Calif, residents add 6Vz% sales tax 

14319 E. Swift Drive • C.Q.D. orders add $2.50 

La Mirada CA 90638 • Sorry, no charge cards 

(213) 944-1069 • Dealer 4 distributor inquiries invited 

AUTO REPEAT" 

for rev 7 & later {19.95 

„„„„ , lower case EPROM 

OTHER \ lor m 7 & later $24.95 

MASTER MFG. \ • HANGMAN 

PRODUCTS FOB THE I l«>(oy»*l«. aducalloml soltwarel {19.95 
APPLP II A II PI IK / * MOVIE TRIVIA-QUIZ MASTER'" 

MrrLt ii 4 ii rLUb / nooi 04/M {19.95 

COMPUTER TUTOR-qUIZ MASTER" 
(100! Q&A] {19.95 

'Apple II. Apple II plus, and Disk II are trademarks of Apple Computer, INC. 
"Auto Repeat and Quiz Master are trademarks of Master Manufacturing. 




FLEX/UniFLEX 
SOFTWARE 





/■ 


x 

( 








f CUSTOMER 
^ PROGRAM 

f OROER 
\. ENTRY 

, ^ 

1 ACCOUNTS > 
I RECEIVABLE h 


f VENDOR A 
V PROGRAM / 


THE 
TOTAL 


NVENTORY 


J 7 PURCHASE \ 




^T I OROER J 

\ \ 

]T ACCOUNTS ^ 


SYSTEM 


GENERAL 
LEOOER 


^\--**\ PAYABLE J 






\ 




[ ~v*o lL ) 








DATA BASE 
MANAGER 


^ 






\ 


J 




INTRODUCING SOFTWARE 

DATA BASE MANAGER M 50°° 

CHURCH CONTRIBUTION PKG M50°° 

SINGLE ENTRY LEDGER »95°° 

FOR THE COLOR COMPUTER 

2457 Wehrle Drive • Buffalo, New York 14221 • (716) 631-3011 

'^-EX Ar <0 UNIFLEX ARE TRADEMARKS OF TECHNICAL SYSTEMS CONSULTANTS 

UNIVERSALIS 
DATA \J 

k\V RESEARCH 







USERS! 



READ . . 




The Unofficial OSI Users Journal 



THE WORLD WMDE PUBLICATION 
EXCLUSIVELY DEDICATED TO OSI USERS! 

□ Hardware Mods. □ Peeks and Pokes □ Bugs and Fixes 

□ Software Exchange D Software Reviews 

SEND $15.00 FOR 12 ISSUES TO: 

PEEK (65) P.O. BOX 347, OWINGS MILLS, MD 21117 (301) 363-3267 



Maryland Subscribers Add 5% Tax 



Inquire for Foreign Rates 
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Market Projection Program 
for the Color Computer 



by Leonard I. Suckle 



This sophisticated business 
program is implemented on an 
inexpensive Color Computer 
system. It may be modified for 
other computers. 

Market Projection 

requires: 

TRS-80 Color Computer 
with 16K 

It does not require Extended 
Color BASIC 

The introduction of low-cost personal 
computers has placed the capability of 
huge computational powers within the 
economic reach of nearly everyone. 
Unfortunately, many of the lower- 
priced systems are being promoted or 
received as either toys or games. 

The program described in this arti- 
cle is an example of how the Radio 
Shack Color Computer may be used in 
an actual business application. The 
computer used here is the 16K version 
without the Extended BASIC ROM. It 
may be purchased for under $500. The 
addition of a line printer and a cassette 
tape recorder add approximately $300 
to provide for a complete, versatile 
system. 

The program is written in BASIC 
and may be used on any compatible 
system. Variations could easily be 
made to customize it to the users' 
specific needs. These applications 
should substantiate that the use of low- 
cost personal computers in business 
should not be overlooked. 

Program Description 

Making projections on industry and 
company sales, when a multitude of 
product lines are involved, can be a 
long and tedious task. A single change 
in value usually results in complete 
recalculation of the other parameters 
for each year of the projection. Knowl- 
edge of the required changes causes 



either a conscious or subconcious hesi- 
tation in the modification of data to 
provide more realistic interpretation of 
the market conditions of the future. 

The intent of this computer pro- 
gram is to alleviate the tedious calcula- 
tion and recalculation associated with 
revisions. With the capability of making 
changes and seeing their immediate 
effect on the rest of the data, more ac- 
curate decisions may be made in in- 
dustry planning functions. 



The market projection computer 
program evaluates a market and share 
of the market by year and by each of 
many product categories. The market 
parameters evaluated for each of the 
product categories are shown in table 1 . 
The computer refers to each of these 
parameters by their item # (1 through 
9) shown in the table and in figure 1 in 
brackets. 



The total of all columns of data will 
be calculated upon request. Further- 
more, a top-down summation value 
may be entered for TAM and NSB, and 
the difference between the actual and 
top-down summations will be dis- 
played. Upon request, the computer 
will adjust the TAMs and NSBs, based 
on product mix, so they equal the top- 
down value. 

Entering and working with two 
years of data at a time allows you to 
make projections and/or calculate 
compound growth rates. Data from one 
year may be projected by annual com- 
pound growth rate f %) to the other year 
in memory. Select any of the nine para- 
meters for projection. Calculations will 
be done either on a product category 
basis or for all product categories. If 
data is entered for both years, the com- 
puter can calculate the growth rate of 
any data on an annual compound 
percentage. 



Table 1: Market Parameters 

1. Company Market Share (NSB/TAM) in % 

2. Total Available Market (TAM) in millions of $ 

3. Industry Product Mix [TAM of specific product/Total TAM) in % 

4. Industry Quantity in millions of units 

5. Industry Average Selling Price (ASP) in $ 

6. Company Sales (NSB) in millions of $ 

7. Company Product Mix (NSB of specific product/Total NSB) in % 

8. Company Quantity in millions of units 

9. Company Average Selling Price (ASP) in $ 



Data may be saved and loaded by 
year from cassette. Two years of data 
may be stored in memory for entry and 
calculation. Within any one of the two 
years, data may be calculated based on 
other data entered. This may be done 
on a product category basis, or for all 
product categories. For example, if the 
units and ASP for industry have been 
entered, the program will calculate the 
TAM. For expediency of operation, cal- 
culations are made only when re- 
quested, rather than whenever new 
data is entered. 



Video Display Characteristics 

Data for each of the two years stored 
in memory is presented in an array of 
pages for each year on the TV display of 
the Color Computer. These pages are 
arranged in a 3 x N matrix, where N is 
dependent upon the number of product 
categories. 

Three vertical pages can display a 
maximum of 29 product categories. 
This example is shown in figure 1 . The 
product categories are numbered and 



No. 52 - September 1982 



MICRO - The 6502/6809 Journal 



67 



NEW LOW PRICE 

DIRECT FROM MANUFACTURER 

$120.00 



1 f • f tmm *"«•"••••• 
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VBM 



16K RAM EXPANSION BOARD 
FOR THE APPLE II* $120.00 



The Andromeda I6K RAM Expansion Board 
allows your Apple to use RAM memory in place 
of the BASIC Language ROMs giving you up 
to 64K of programmable memory. Separate 
Applesoft* or Integer BASIC ROM cards are no 
longer needed. The 16K RAM Expansion Board 
works with the Microsoft Z-80 card, Visicalc, 
DOS 3-3, Pascal, Fortran, Pilot, and other 
software. A switch on the card selects either 
the RAM language or the mainboard ROMs 
when you reset your Apple. 

The Andromeda 16K RAM Expansion 
Board has a proven record for reliability with 
thousands of satisfied customers. 



Now with One Year Warranty. 

ANDROMEDA 



n 



INCORPORATED 

Greensboro, NIC. 27410 
919 852-1482 P.O. Box 19144 

| Price for Andromeda 16K RAM 
expansion board now only S 1 20.00. 
Please add $5 for shipping and 
handling. North Carolina residents 
add 4% sales tax. 
*DEALER INQUIRIES WELCOME. 
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listed along the left side of the display, 
and the market parameters and their item 
numbers are displayed across the top. 

The two years stored in memory are 
defined as the primary and secondary 
years, and are located on pages 1 
through 3, and 4 through 6, respectively. 
When in the display mode of the pro- 
gram, the page being displayed may be 
changed by direct numerical entry of 
the desired page, or by indexing left, 
right, up, and down (see DISPLAY). 

Printer Output 

Data from either the primary or 
secondary year may be output to a 
printer connected to the Color Com- 
puter. The Quick Printer II interfaces 
directly, and provides a 32-character 
line width. The program prints the data 
within the year last displayed on the 
video. All pages of the displayed year 
will be printed independent of the page 
shown on the video display. 

Operation 

The program is loaded from cassette 
tape into memory using the CLOAD 
command. Sufficient memory must be 
allocated to the program [13,700 
bytes) . Although the program was writ- 
ten with standard ROM, it will also 
operate with an extended ROM com- 
puter, but a comparable amount of 
memory must be freed to permit opera- 
tion. Extended BASIC will not free 
more memory than that amount 
created by the PCLEAR 1 command. 
This is not enough memory for this 
program, so an additional page of 
memory must be freed prior to loading. 
This may be done by entering the 
following command: 

POKE 25,6 (enter) 



After the program is loaded, entering 
RUN initiates operation. The screen 
will clear and the program enters MAIN 
CONTROL. The program is initiated 
with all data cleared, primary year = 
1981, secondary year =1986, and the 
display page pointer set at 1,|1). 

MAIN CONTROL 

MAIN CONTROL is the principal 
operating routine from which all other 
routines may be activated. Operation is 
indicated by an inverted-screen (dark 
background) "M" in the lower left of 
the display, preceding the cursor. 

Commands available from MAIN 
CONTROL are shown in table 2. The 



Figure 1: Video Display Pages 1 through 3 for Primary Year (Secondary Year 
Pages are 4 through 6). Vertical Page Is specified by "shift (n)", where n = 1 to 3. 
Item #'s are shown In brackets and are described In table 1. 


Year NSB/TAM TAM MIX-T UNITS ASP 
PRODUCT LINE (1) (2) (3) (4) (5) 

^^^^tt|^Pi€ :#? 1 

2 


NSB MIX-N UNITS ASP 
(6) (7) (8) (9) 

""i'd •'.' " 




0) 


11 PG1 11 PG2 


11 PG3 




Year NSBATAM TAM MIX-T UNITS ASP 
PRODUCT LINE (1) (2) (3) (4) (5) 


NSB MIX-N UNITS ASP 

(6) (7) (8) (9) 




12 12 


12 


(2) 


22 PG1 22 PG2 


22 PG3 




Year NSB/TAM TAM MIX-T UNITS ASP 
PRODUCT LINE (1) (2) (3) (4) (5) 


NSB MIX-N UNITS ASP 
(6) (7) (8) (9) 




23 23 


23 


(3) 


29 29 
SUMMATION SUM 

30 TOP DOWN TOTAL 30 

DELTA PG1 DELTA PG2 


29 

SUM 

30 

DELTA PG3 





"enter" key must be used when oper- 
ating in this routine. 

DISPLAY 

The display routine outputs the 
data for the primary or secondary years 
stored in memory to the video display. 
Operation in this routine is indicated 
by an inverted-screen "D" in the lower 
left of the display. 

As previously described under 
Video Display Characteristics, each 
year is displayed in a 3 x N matrix of 
pages. Any page may be immediately 
displayed by entering the horizontal 
page number directly, and the vertical 
page number using the shift key. The 
display may also be changed by using 
the arrow of the appropriate direction 
(up, down, left, right). The "enter" key 
is not needed with entries from DIS- 
PLAY, and all actions will occur im- 



mediately upon depression of the ap- 
propriate key. 

Commands available from DIS- 
PLAY are shown in table 3. 

ENTRY 

The entry routine permits entry of 
data into the designated column of the 
year last displayed on the video. An 
inverted-screen "E" is displayed in the 
lower left of the video screen to in- 
dicate operation in this routine. The 
"enter" key is required for entries in 
this routine. 

Upon entering this routine, the 
display will prompt the user with the 
request: 

ROW(* OR YEAR), ITEM #(*), VALUE 
(OR 'YR'„YEARJ 

(Continued on page 11) 
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APPLE II PERIPHERAL DEVELOPERS: 

Your complex (unction prototype requires 
the best wirewrap board available. 

SPECTRUM SYSTEMS MAKES IT! 



Fully Extended Wirewrap Protoboard. 

Size: 2.8 by 10.7 inch 2 layer PC. 
Capacity: up to 58-16 pin or 12-40 pin 

or any combination sockets inbetween. 

Carefully designed +5 and GND planes provide for 
tile minimum electrical noise, low impedance, fti 
capacitance, and maximum versatility in the layout 
of IC's, capacitors, discretes and I/O connectors. 

Wire-wrap technique documentation included. 

Terms: 

• $45.00 + (6% Cat. Res. tax) + S2.00 S4YH. 

• All payments must tie in U.S. funds drawn on a U.S. 
bank. 

• Outside U.S. add 10%. 

• Cashier check/money order allow 30 day ARO. 

• Personal checks add 2 weeks. 

• No credit cards or cash, Please! 

Spectrum Systems 

P.O. Box 2262 

Santa Barbara, Ca. 93120 

Aoplill is a trademark or Apple Com pillars. 




M.P. Computer Services Corporation 

2396 Enclnal Station 

Sunnyvale, California 94087 

(408) 735-0871 





Retail 


Your Price 


P.F.S.II "NEW IMPROVED" 


$125.00 


$ 96.00 


P.F.S. REPORT 


95.00 


74.00 


P.F.S. GRAPH "NEW" 


125.00 


96.00 


(Interfaces with P.F.S. and VisiCalc) 






VISICALC 3.3 


250.00 


225.00 


VISITERM 


100.00 


80.00 


VISIDEX 


250.00 


195.00 


VISIPLOT 


200.00 


158.00 


SUPER DISK COPY II 


30.00 


25.00 


PRO EASYWRITER/MAILER COMBO 


300.00 


225.00 


EASYSPELLER 


175.00 


137.00 


THE DICTIONARY 


99.50 


74.00 


CREATIVE FINANCING 


195.00 


143.00 


REAL ESTATE ANALYZER II 


195.00 


143.00 


THE BOOKKEEPER MASTER 


89.95 


66.00 


THE HOME ACCOUNTANT 


74.95 


60.00 


TYPING TUTOR II 


24.95 


19.95 


SUPER DISK COPY III 


30.00 


26.00 


APPLE 21 


24.95 


21.95 


CRAPS 


24.95 


21.95 


CROSSFIRE 


29.95 


24.97 


SABOTAGE 


24.95 


21.95 


THREE MILE ISLAND 


39.95 


33.97 


STAR THIEF 


29.95 


23.97 


Hardware 






EPSON MX 80 PRINTER 


599.00 


525.00 


EPSON MX 100 PRINTER 


995.00 


799.00 


OKIDATA82A PRINTER 




510.00 


OKIDATA 83A PRINTER 




799.00 


PROMETHEUS VERSAcard 


199.00 


167.00 


16K RAM CARD 


169.00 


105.00 


AMDEK VIDEO 100 MONITOR 


179.00 


117.00 


AMDEK VIDEO 300 MONITOR 


249.00 


208.00 


AMDEK COLOR I MONITOR 


449.00 


384.00 



5 Send check or money order. CA residents add 6% sales tax. Add $2.00 
m forpostage. All items subject to availability. Send $.50 for our catalog or a 
•5 free catalog with your order. 



Olympic 
Sales 

m* SERVING YOU SINCE 1947 

Company 

Main Showroom & Offices: . , | 

Z16 South Oxford Avenue ^ra*T| 

Los Angeles, CA 90004 ' ,'"1^—"' 

WE HONOR li f^^l 

VISA and MASTERCHARGE I WW 



TELEX: 67 34 77 

OROER DESKS open 7 DaysaWeek! 

7:00 AM to 7:00 PM Mon thru Sat 

Sunday Noon to 5:00 PM 

Order Desks: (213) 739-1130 

TOLL-FREE TOLL-FREE 

(outside Calif.) (within Calif.) 

800-421-8045 800-252-2153 



NO ONE UNDERSELLS OLYMPIC SALES 
Write & request our new 112 pg catalog- 
please include $1.00 to defray postage & 
handling-includes many more Kems-from 
TV's to Watches! 



All goods subject to availability, this ad super- 
sedes all previous ads: ive are not responsible 
for typographical errors: we will meet or beat 
any advertised prices if the competition has 
the goods on hand. 

Minimum shipping and handling S4.95. 
All orders subject to verification and acceptance. 




fee mi auttwiiac) eervidria Apple dialer for Applt II & III 
Immediate delivery an |N maleli-Me carry an enormous inventory 



putar 



uf Appta product* at all timw! 

Immediate delivery 
32K-48K-64K-PIUS or Integer in stock! 



16K- 
u^irmm^o. NEW ' IMPROVED APPLE 111 12BK VERSION 



Oidcivith cnntrolltw DOS 13 
Second Did, Ornm 
Pual-Fartnn-Csbol linfiwoti 
Dow Jona & Quoit rtporw 
Graphics Tablatt 
Viiiofc for Applt II & III 
Smtrtirm 10 estumn card 
nffieramodam II by 0C Hayn 



ATTENTION: ImiMdiata daliwry 
WE ALSO CARRV SOFTWARE! 
rVsonal Software i 

Peach Traa Software 
Microioft 
Kcroprt) 



American 
Syittfn Plui 
and mora. . 




-888 



(VI 



HEWLETT PACKARD 

2 NEW DELUXE CAL CS FROM HP! 
Slim, shirt-pocket styling 



Your Cost: 
$114.95 

Your Cost: 
$129.95 

fie/ail Vow Cost 
3750 00 3195.H0 



NEW! HP-110 

Adnncstf Programmjible 
Scientific LCD Rewl SI 30.00 

NEW! HP-12C 

Advancsd Programmable 

Financial LCD fotd[l:St50 .00 
HP-125 Hwm Microcomiuttr 

64K CPU/T«rm(nal/Kflvboard 
HP« Microcornpute^buitt-in printer/monitor 

32M.00 2499.00 
NP-S3 Microcomputer -built in monitor 2250.00 179840 
HP-2631B Printer, do(ibtrx(«k for optiw) 3950.M 3199.00 
HP82905A SO col pontic, dot matrix 945.00 755.00 

HP2601A Latter qualify prttr, daisy wheal 3495.00 

HP 42 901 M Dual martrt (256KB diifc drivel 2500.00 1999.00 
Call uifor the lowsn pJicet on 7 disk drivti.Call ui Call ui 

HP-41 CV New! 2.2K bytes of memory 325 DO 256.00 

CardHnderloMICV 215.00 171.00 

Printer for 41 CV 385.00 294.00 

Ouad Ram 95.00 B4.95 

Optical Wend for 41 CV 125.00 99.95 

HP-41C Calculator 250 00 188.95 

Memory mod, for 4TC 26.95 

HP 97 Progrmble printer 750.00 579.95 

HP-34C Proermbltwiejitific ISA 00 117.95 

HP-38C Proqimble business R/E 150.00 1 19.95 
Wo haw the complete line of accenorin, etc. 



busine; 
iletelin 

if 



XEROX 

Model 120.1 |5*"> 8" J37S0.0O 

G4K COMPUTER SWORD PROCESSOR 

AS LOW AS Special discount aviikblt ro 



NEW-FAMOUS CD RVUS DISK DRIVES-5, 10. 20 
MEGABYTES with lantartic now 0MN.NET Network 
Call us for the best prices in the USA! System 



Texas Instruments 



!£££££%*«. ""■« Computer 

TT-H/4A U/L case) & more! Re(ai , y ou , Cos 

Mm KEYBOARD ^ ^^ SgC|QQn 435995 

keyboard 



"■•I nc t hum 

B 369 s 



10" color monitor lor 99/4 ~"** - ^" 650 00 
32K Exp. mem module 399 95 

Estended Basic. I MUST lor 100 00 

32K module 
Speech rvntfiesiiei 150 00 

We carry a larrje inventory of solrweri, & 
icteuorm Your Coir 

TI-30-2 LCS Stu Slide NEW U.9S 
TI-3SSPLC0 SCIENTIFIC 22.50 
TI-40 LCD Sci/NEW 
TI-57 Prog. Scientific 
TI-58C 480 Step Prog. 
TI-59 960 Step. Prog. 
PC 100C Print/Plot 
LCD-Programmer/NEW 



31999 
3149S 
75 00 




A *T A T\ I LlrM! invontory of p 

ATARI Computer 



Large jnvootory of perlphlt, access, etc. 

Vom Con 

400 SPECIAL PHICE! I6K 595 00 339.95 

No language inc., opt'l belie, 54.95 

800 16K Computer 1080 00 759.95 

SPECIAL' 

ATHfll 800 48K Corrupter 1250.00 169.89 



C8PDF-48K Re1ail.$3495.00Y/C: $3195.00 

• Dual 8" Drives «64 col x 32 line/color 

• .7 MIPS -FAST'ilHtny more stnd features 

Fortran & Pascal available 

Many other OS! products -at discounted prices 



PRINTERS 

• DIABLO (Letter Quality) 
630 R102bi-rJirectnal/trar.tors 
1640K109 keyboard, tractors 
630 RO Receive only 

1 650K136 keyboard/tractors 

CENTRONICSdm matrix - 
700-9 Parallel, heavy duty 
704-9 Serial, heavy duty 
737 I Parallel 
737-3 Serial 
704-11 Parallel 
PI Electrostatic 

• PAPER TIGER 
460 

460G graphics 
560 

S60G graphics 
445 
445G 

EPSON PRINTERS 



Retail Your Coil 
2965.00 2699.00 
3072 00 2899.95 
2710 00 2499,95 
3220,00 2999.95 



H60.00 
1795.00 

995.00 
1045.00 
1870.00 

495.00 



1199.95 
1599.95 
799.95 
899.95 
1695.00 
189,95 



995.00 


895.00 


1094.00 


969.95 


12S5.00 


1099.00 


1394 00 


1195.00 


795.00 


695.00 


894.00 


789.00 



Retail: Your Con 



MXI0 

Optional Graftrax Chip 80 


645.00 


539.95 
95.00 


MX80 FT 

MXI0* GRAFTRAX 80 

MX80FT*GDAFTrlAX80 

MX100 


745.00 
695.00 
795.00 
395.00 


659.95 
578.95 
689.95 
789.95 


WE ALSO HAVE . . . 

• NOVATION Modems 


Retail V. 


our Cost 


CAT 


199 95 


159.95 


0CAT 


199.95 


159.96 


APPLE CAT Direct connect 


349 35 


314.95 



SANYO MONITORS High resolution 

1 3" Color (new) high quality 550 00 419.95 

12" Green phosphorous 360 00 259.95 

12" Black & white 340 00 239.95 

15" Black & white 370 00 259.95 

9" Black S vytlile-ltrie best sellerl 23SOO 169.95 

AMDEK(Leedex)High Quality Monitors 

100 12"8/W.12MHz 179.00 139.95 

100 G 12" Green, 12 MHi 199.00 174.95 

300 G 12" Great). 18 MHi 249.00 199.95 

Color I 13" Color, NTSCcomp. input. 449.00 339.95 

audio amp & speaker 

Color II 13" Color. RBG input, 999.00 699.95 

hi rei graphics, speaker 

• HAZELTINE Video Display Terminals 

• SHUGART Disk Drives 
•DEC VT100 & VT103 

Call us for your DISCOUNTED price TODAY! 



NEW! Ftom Tl-Series 10 Personal Information Terminal detail gg5 00 your Cost 79s. 00 
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Data Entry Options 

a. Entry or change of specific data 
within the displayed year: Enter the 
location of the new data (row # 
shown at left of screen, item # 
shown at top of screen), followed by 
the new value of data. For example, 
to enter a value of 10 for TAM (item 
#2) of product category #3, enter: 

3,2,10 (enter) 



b. Entry or change of all values of a 
specific item # within the displayed 
year: Enter an "*" for the row, 
followed by the item # and a comma. 
The program will then prompt the 
user for the desired data value for 
each row (product category) by dis- 
playing the name of theproduct cate- 
gory, and the present value (PVJ. 
Three possible entries of data may be 
made: 1. the new value, 2. eater, 
which is accepted as a value of zero, 
and 3. "/", which retains the pres- 
ent value. 

Example of entering data for 
TAM for all product categories: 

*,2, (enter) 

c. Entry or change of all values of data 
for a specific product category (row): 
Enter the row #, followed by an "*" 
for the item #, followed by a comma. 
The program will then prompt the 
user to enter data for each of the nine 
items for the specific product cate- 
gory designated. A value must be 
entered for each item request. The 
"enter" key with no preceding value 
is interpreted as a value of zero. 

Example of requesting entry for 
all items for product category #14: 

14,*, (enter) 

d. Change of primary or secondary 
year: The value of the years for 
primary and secondary display pages 
is initialized at 1981 and 1986, 
respectively. Either of these years 
may be changed to any other year 
value. The display should be set to 
the year to be changed (pages 1 
through 3 for primary year, pages 4 
through 6 for secondary year). The 
enter command may then be used, as 
shown in the following example, 
which changes the year to 1989: 

YR,,1989 (enter) 

When any of the entry requests are 
completed, the program will always 
return to DISPLAY. 



CALCULATE 

The calculate routine which gener- 
ates data within the displayed year, 
projects data from the primary year to 
the secondary year using an entered an- 
nual compound growth rate, or redis- 
tributes either the TAM or NSB of the 
displayed year to equal an entered top- 
down summation. The annual com- 
pound growth rate between items in 
the primary and secondary years may 
also be calculated. 



Operation in this routine is in- 
dicated by an inverted-screen "C" in 
the lower left of the display. Entry into 
CALCULATE may be performed from 
either MAIN CONTROL or DISPLAY, 
but exit is always to DISPLAY. 

Upon entry to CALCULATE, the 
display will prompt the user with the 
following request: 

DATA / RATE,PROJCTN, SPREAD? 

(continued) 



Table 2: Commands Available from MAIN CONTROL 


Command 


Routine 


Action 


D 


DISPLAY 


Program enters video display routine. 


E 


ENTER 


Program enters data entry routine. 


C 


CALCULATE 


Program enters calculate routine, where new 
data is determined based on previously 
entered data. 


S 




Calculates sums of all columns within the 
year that is presently displayed on video. 


CLR 


CLEAR 


Permits clearing data in either primary or 
secondary year, as specified. 


R 




Displays previously calculated compound 
growth rates on video screen (see 
CALCULATE). 


P 




Data within vertical page last displayed is 
output to the printer, as described in 
PRINTER OUTPUT. 


RP 




Outputs previously calculated compound 
growth rates to the printer (see 
CALCULATE!. 


LD 


LOAD 


Loads yearly data previously stored on 
cassette tape. 


SAVE 


SAVE 


Saves primary or secondary year data on 
cassette tape. 


HEADER 




Cassette tape is prepared to receive data for a 
year not previously stored. See "Tape 
Initialization" under SAVE. 


Table 3: Commands Available from DISPLAY 


Command 


Routine 


Action 


R 




Same as command described under MAIN 
CONTROL 


E 


ENTER 


Same as above 


C 


CALCULATE 


Same as above 


P 




Same as above 


S 




Same as above 


+ 




Special Sum — calculates sums of columns 
between specific rows (product lines) 
designated by user. 


Q 




Return to MAIN CONTROL. 
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The user response must be followed by 
an "enter" key. 

Calculate Options 

D Data: Calculates data within the 
displayed year based on existing data. 
Entry into this subroutine results in the 
following request on the display: 

ROW(«), ITEM #? 

The location of the desired parameter is 
entered using the row # shown on the 
left of the screen and the item # shown 
at the top of the screen. If an entire col- 
umn is to be calculated, an * may be used 
in place of the row #. For example, to 
calculate the value of industry units 
(item 4] based on TAM and ASP, enter 
the following: 

*,4 (enter) 

The calculations for TAM and NSB 
may be based on a variety of constants. 
Whenever a request for these calcula- 
tions is made, the computer requests 
more information: 

CONSTANT (3), (4)&(5), (1)? 

The item # to be held constant is 
entered using the "enter" key, and the 
calculation is performed. 

D134 Data: Automatically performs a 
series of calculations comparable to 
"D" for items 1, 3, and 4 for all product 
categories (rows). 

D178 Data: Automatically performs a 
series of calculations comparable to 
"D" for items 1, 7, and 8 for all product 
categories (rows). 

R Rate: Calculates the annual com- 
pound growth rate between primary 
and secondary year data. Entry into this 
subroutine results in the display of the 
prompt: 

ROW[OR"*"),ITEM? 

The growth rate for a particular product 
category (row) and item may be 
entered, or all product categories for 
the specific item may be calculated by 
using " * " for the row #. The algorithm 
for calculating the compound growth is 
relatively slow, so an indication of 
which row is being calculated is shown 
to indicate that the computer is oper- 
ating. At the completion of the calcula- 
tion, the value(s) are shown on the 
display as: 

PRODUCT LINE YEAR(l) 
YEAR(2) RATE(%) 



Appendix A 



1 CLEAR 

9 • MPP 

10 ' l: I. SUCKLE 

12 ' 12/80 

13 ' REVl 10/19/81 
20 ' INITIALIZATION 

23 '*»***ENTER NUMBER OF PRODUCT CATEGORIES IN LINE 30 

30 PC-6 

33 PT-PC+liPH-INT(<PC+3)/ll)+l 

40 DIM T(PT, 18>,H1*(9>,H2*<9> 

43 DIM PL*<PT>,SM<18),RT<PT) 

30 DIM TN(4) 

60 HI*- "PRODUCT CAT. " 

80 DATA N8B/TAM,TAM,MIX-T, UNITS, ASP 

100 DATA NBB,NIX-N,UNITS,ASP 

120 DATA X (1), <2>, (3), (4), (3) 

130 DATA (6), (7), <B> , <9) 

160 FOR N-l TO 9 

160 READ H1«(N) 

2O0 NEXT N 

220 FOR N-l TO 9 

240 READ H2«(N) 

260 NEXT N 

270 CLS 

273 PB-liPP-1 

280 Y1-19B1 

290 Y2-19B6 

300 YR-V1 

320 SL-32*13 

330 ' OOCENTER THE NAMES OF PRODUCT CATEGORIES IN LINES 340-400 

340 DATA WIDGETS, THINGOTS.DIPSIES, DOODLES, WHATCHA.MACALLETS 

410 FOR N-l TO PC 

420 READ PL«(N) 

430 NEXT N 

440 FX-10 

430 GOBUB 9000 

460 FD-FN 

470 PL* <PT) -"TOP-DOWN TOTALS" 

480 JF-0 

1000 REM MAIN CONTROL 

1010 PRINT8BL 

1020 PRINT8SL, "m"i 

1040 INPUT 00* 

1033 0*-LEFT*(00«,1> 

1060 IF Q«-"D" THEN 20O0 

1070 IF Q*-"E" THEN 7000 

10BO IF 00*-"8AVE" THEN 4000 

1090 IF Q0*-"LD" THEN 3000 

1093 IF DO*-"CLR" THEN 11000 

1100 IF Q«-"C" THEN 6000 

1110 IF B»-"P" THEN 8000 

1120 IF QO*-" HEADER" THEN 1O000 

1123 IF 00*- "RP" THEN 27O0 

1130 IF Q*-"R" THEN Ll-liL2-29i GOSUB 6340 

1140 IF 0«-"8" THEN GOBUB 2300 

1999 GOTO 1020 

2000 REM LIST ROUTINE 
2020 CLS 

2023 IF PQ>3 THEN YR-Y2 ELSE YR-Y1 

2030 ON PS GOTO 2038,2040,2030, 2032,2034,2036 

2038 BT-liGOTO 2060 

2040 ST-2»Q0TO 2060 

2030 8T-61GOTO 2060 

2032 BT-lOiGOTO 2O60 

2034 ST- 1 1 1 GOTO 2060 

2036 ST- 13 

2060 L8-1+11*<PP-1) 

2070 IF PC<LB+10 THEN LE-PC ELSE LE-LS+10 

2080 8-BT 

2090 PRINT30, RIGHT* <STR«<YR> ,4) 

2100 PRINT 832, "<YR>" 

2110 IF PG-1 OR PG-4 THEN 2300 

2120 FOR L-4 TO 23 STEP 7 

2123 IF PG>3 THEN 81-S-9 EL8E Sl-S 

2130 PRINT3L," , '+Hl*(Bl) 

2 1 40 PR I NT9L+32 , " " +H2* < S 1 ) 

2130 K-64 

2133 IF L8>PC THEN 2220 

2160 FOR P-LB TO LE 

2170 IF L-4 THEN PRINT3K.P 

2173 T-INT(T(P,S)il00+.3)/lOO 

2180 PRINT8L+K,T| 

2190 K-K+32 

2200 NEXT P 

2210 IF PPOPM THEN 2270 

2220 IF L<>4 THEN 2260 

2230 PR I NT3K+64 , PT 1 PR I NT9K+6B , T < PT , S ) 

2240 PRINT8K+96, "DLTA" 1 IF FS-1 THEN PRINT3K+100, 

INT(100*(T(PT.9)-SM(S))+.3)/100 
2230 PRINT8K>32, "8UM" 

2260 IF FS-1 THEN PRINT8L+K+32, INT<SH<S) H100+.5) /100 
2270 S-8+1 
2280 NEXT L 
2290 GOTO 2900 



(Continui 



72 



MICRO - The 6502/6809 Journal 



No. 52 - September 1$ 



Appendix A (continued) 



2300 PRINT85.H1* 
2310 PRINT825,H1*(1) 
2330 PRINT857,H2*<1> 
2340 K-64 

234S IF L8>PC THEN 2420 

2330 FOR P-LS TO LE 

2360 PRINT8K.P 

2370 PRINT8K+4,PL*(P> 

2380 PRINT8K+25, INT (T (P, ST) *100+. 3) /100 

2390 K-K+32 

2400 NEXT P 

2410 IF PPOPM THEN 2900 

2420 PR I NT8K+36," SUMMATION" 

2430 IF FS-1 THEN PRINT8K+57, INT (SM (ST) *100+. 5) /100 

2440 PRINT8K+64,PT| " TOP-DOWN TOTAL" 

2430 PRINT 8K+ 100," DELTA" 

2460 GOTO 2900 

2470 PRINT8SL,"mun FIRST ROM, LAST ROW"| 

2480 INPUT JS.JE 

2483 QOSUB 2303 

2488 PP-3 

2490 JF-1 

2493 SOTO 2000 

2500 PRINT8SL,"CALCULATINS SUMS" 

2301 JS-liJE-PC 

2302 JF»0 

2303 FOR N-l TO 18 
2310 SM(N>-0 

2320 NEXT N 

2330 FOR N-JS TO JE 

2332 SH(3)-SM(3)+T(N,3> 

2333 SM(7)-SH(7>+T(N,7> 

2336 SM(12)»8M(12)+T(N,12) 

2337 8M(16>-BM(16>+T(N,16> 
2340 FOR J-2 TO 17 STEP 2 
2550 SM(J)-SM(J)+T(N, J) 
2560 IF J-B THEN J-9 
2370 NEXT J 

2380 NEXT N 

2590 FOR J-0 TO 9 STEP 9 

2600 IF SM(2+J)<>0 THEN SM < 1+J ) *100*SM (6+J ) /SM (2+J) 

2610 IF SM(4+J)<>0 THEN SM<5+J ) -SM (2+J) /8M (4+J ) 

2620 IF SM(8+J)<>0 THEN SM (9+J> -SM (6+J > /SM (8+J > 

2630 NEXT J 

2635 FS-1 

2640 RETURN 

2700 REM RATE PRINT 

2710 PRINT#-2,TAB(4)H1*(IR>| 

2720 PRINT#-2,TAB(11)Y1| 

2730 PRINT#-2,TAB(18)Y2| 

2740 PRINT#-2,TAB(25) "RATE" 

2730 FOR N-l TO PC 

2760 PRINT#-2,CHR*(0)| 

2770 PRINT#-2,N|LEFT*(PL*(N) ,8) | 

2773 DR-N:DI-IRlS0SUB9500 

2774 PRINT#-2,TAB(11)D| 
2777 DI-IR+9lQ0SUB9500 
27S0 PRINT#-2,TAB(1B)D| 

2790 PRINT#-2,TAB(25)INT(RT(N)*10+.5)/10 
2S00 NEXT N 
2S10 GOTO 1000 

2900 PRINT8503,"PS"PS| 

2901 PRINT8SL, "d"( 

2902 IF JF-1 AND PP-3 THEN PRINT8SL, "mpocl*l mum ROWS" JS| " TO"|JE 

2903 PRINT8SL,"d"| 

2904 X*-INKEY* 

2905 IF X*-"" THEN 2902 

2906 IF X*-"R" THEN Ll-1 l L2-PCl Q0T06340 

2909 IF X»-"+" THEN 2470 

2910 IF X*-"Q" THEN 1000 

2911 IF X*-"E" THEN 7000 

2912 IF X*-"C" THEN 6000 

2913 IF X»-"S" THEN QOSUB 2500 

2914 IF X*-"P" THEN SOOO 

2915 X-VAL(X*> 

2920 IF X>0 AND X<7 THEN PQ-X 

2925 Y*-CHR»(ASC(X*)+16) 

2930 Y-VAL(Y») 

2935 IF Y>0 AND Y<-PM THEN PP-Y 

2940 IF X*-CHR*(9) THEN IF PQ<6 THEN PQ-PO+1 

2945 IF X»-CHR*(S) THEN IF P0>1 THEN PO-PQ-1 

2930 IF X»-CHR*(94) THEN IF PPMTHEN PP-PP-1 

2935 IF X»-CHR*(10) THEN IF PP<PM THEN PP-PP+1 

2963 SOTO 2020 

3000 REM MULTIPLE CALC. 

3010 R»-"*" 

3020 I -1: QOSUB 6530 

3030 I -3 I QOSUB 6530 

3040 I -4 1 QOSUB 6530 

3050 GOTO 2000 

3060 R»-"»" 

3070 I -1: QOSUB 6530 

30Q0 i-7iS0Sub 6530 (Continued) 



When the entire column has been cal- 
culated, a display page is filled and 
waits for any key input before display- 
ing the next page. After the last data is 
displayed, any key entry returns the 
operation to DISPLAY. The latest rate 
calculation may be reviewed from 
either DISPLAY or MAIN DISPLAY by 
entering "R". The rate data may be 
output to the printer by entering "RP" 
from MAIN CONTROL. 

P Projection: Calculates a new value of 
data in the secondary year based on ex- 
isting data in the primary year and an 
entered annual compound growth rate 
in %. Entry into this subroutine results 
in a displayed prompt: 

ROW(* OR S), ITEM, RATE? 



The specific row #, and annual rate are 
entered, followed by the "enter" key. 
The calculated data is stored in the ap- 
propriate location in the secondary year 
data table. Completion of the calcula- 
tion returns the program to DISPLAY. 

Sample ENTRY: 

3,2,10 (enter) 

Several options for "row #" are' 

* Data for all product categories 
under the specified item # will be 
calculated. Using an entry, as 
shown by example: 

\2, (enter) 

will result in a display prompt for 
annual rate inputs in percent for 
each product category. 

S Data for all product categories 
under the specified item # will be 
calculated with identical growth 
rates equal to that value entered. An 
example for items 2 and 10% is: 

S,2, 10 (enter) 

The growth rate previously calculated 
with the "R" command under CALCU- 
LATE may be used in place of an 
entered value) s| for rate. This is per- 
formed by using "R" for the value of 
the rate. An example of projecting an 
entire column of data is: 

\2,R (enter) 

S Spread: Redistributes the values of 
either TAM or NSB within the year last 
displayed so the total is equal to an 
entered top-down summation. Redistri- 
bution is based on product mix (item 3 
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or 7). Entry into this subroutine yields 
the prompt: 

ITEM # (2 OR 6)? 

Either 2 or 6 will be accepted, using the 
"enter" key, for spreading TAM or 
NSB, respectively. The program checks 
for a valid entry of top-down summa- 
tion, and if one exists, the calculation 
is performed and the program returns to 
DISPLAY. If an invalid summation is 
found (zero), the program requests that 
a top-down entry be made and returns 
to MAIN CONTROL (indicated by 
inverted-screen " M" 1 . 



CLEAR 

Data for either the primary or 



Data for either the primary or 
secondary year may be reinitialized to 
zero by entering CLR from MAIN 

CONTROL. The program will prompt 

nth: 



with 



CLEAR WHICH YEAR? 



The year is entered (using "enter" 
key) and if it corresponds with either 
the primary or secondary year, all data 
in memory for that year will be cleared. 
If an invalid year is entered, the display 
will indicate: 

YEAR NOT IN DISPLAY 

Exit from the routine is to 
DISPLAY. 



LOAD 

The load routine retrieves data 
previously stored on cassette tape and 
loads it into memory. Access to this 
routine may only be performed from 
MAIN CONTROL. Entering LD results 
in the response: 

LOAD WHICH YEAR INTO PAGES 
1-3(1) OR 4-6(2)? 

Pages 1-3 represent the primary 
year, and 4-6 the secondary year. For 
example, if data for 1 984 is to be placed 
into the secondary year memory, the 
following entry would be made: 

1984,2 (enter) 

The user is then prompted to "RE- 
WIND TAPE & PLAY". After the data 
is loaded, the prompt, "TURN 
RECORDER OFF", is issued and the 
program returns to MAIN CONTROL. 



Appendix A (continued) 



3090 I-BlGOSUB 6330 

3100 QOT02000 

3200 IF VAL(R*><>0 THEN 3240 

3203 R«»"«" 

3210 IF I«IR THEN 6911 

3220 PRINT"CALCULATE RATES FOR ITEM"|IR 

3230 GOTO 1000 

3240 Y3-VAL(R«) 

3250 R«-"«" 

3270 80SUB 6225 

3280 Y2-Y3 

3290 Q0T06911 

4000 REM SAVE 

4003 DL-200 

4010 PRINT8SL, "SAVE WHICH YEAR"| 

4020 INPUT YB» 

4022 YS-VALIYS«> 

4030 IF YSOY1 AND YSOY2 THEN PRINT "DATA NOT AVAILABLE" i iBOTOlOOO 

4031 GOTO 4070 

4033 IF RIBHT«IYS«,1)-"X" THEN 4070 

4040 PRINT SSL, "REWIND TAPE i< "PLAY"' 

4030 FN«»"H"+STR«<YS) 

4060 SKIPF FN* 

4070 PRINT3SL, "SET TO 'RECORD" & ENTER 'READY"' 

4080 INPUT Q* 

4090 IF Q«<>"READY" THEN 1000 

4100 IF YS-Y1 THEN SF-liEF-9 

4110 IF YS-Y2 THEN SF-lOiEF-lS 

4120 OPEN "0",-l, "F"+STR«<YS> 

4125 RP«1 

4160 FOR N-SF TO EF 

4170 FOR K«l TO PT 

4173 ON RP SOTO 4180,4183 

41B0 PRINT#-l,T(K,N)iG0T04190 

41S3 INPUT#-1,T(K,N) 

4190 NEXT K 

4200 NEXT N 

4210 CLOSE- 1 

4212 ON RP GOTO 4214,4220 

4214 MOTORON 

4216 FOR T»l TO DL 

4217 NEXT T 
421 B MOTOROFF 
4220 CLS 

4230 PRINT396, "TURN RECORDER OFF" 

4240 GOTO 1000 

5000 REM LOAD 

5005 CLS 

3010 PRINT3SL, "LOAD WHICH YEAR," 

3013 PRINT "INTO PAGES 1-3(1) OR 4-6<2) 

3020 INPUT YS.YP 

3030 IF YPOl AND YP<>2 THEN 1000 

3033 IF YP-1 THEN SF-1 iEF-9i Yl-YS 

5037 IF YP-2 THEN SF-lOlEF-lBi Y2-YS 

5040 CLSiPRINTaSL,"REWIND TAPE k 'PLAY'" 

3030 0PEN"I",-1,"F"+STR«(YS> 

3060 RP-2 

5070 GOTO 4160 

6000 REM CALCULATE 

6010 PRINT9SL, "c DATA, RATE, PROJCTN, SPREAD" | 

6020 INPUT □• 

6022 FS-0 

6023 IF Q»-"D134" THEN 3010 
6026 IF Q*-"D17B" THEN 3060 
6030 0«-LEFT«(Q*,l) 

6040 IF Q«-»D" THEN OOSUB 6300 

6030 IF Q*-"R" THEN 608UB 6200|80TO 1000 

6060 IF Q«-"P" THEN 6900 

6070 IF Q«<>"3" THEN 2000 

6100 REM SPREAD 

6105 PRINT88L 

6110 PRINT9SL, "e ITEM t <2 OR 6)"| 

6120 INPUT I 

6130 IF I<>2 AND I<>6 THEN 1000 

6133 Il-I 

6140 IF PG>3 THEN I-I+9 

6142 IF T(PT, I)-0 THEN CLSiPRINT "ENTER TOP-DOWN 

6145 80SUB 2500 

6150 D-TIPT, I)-BM(I) 

6160 FOR N-l TO PC 

6165 IF SM<I)-0 THEN 6180 

6170 TIN, I) -TIN, I)+D*T(N, I ) /8M 1 1 ) 

61S0 NEXT N 

6183 GOSUB 2500 

6190 BOTO 2000 

6200 REM RATE 

6203 PRINT9SL 

6210 PRINT9SL,"R0W(0R ' »' ) , ITEM#"| 

6220 INPUT R«, I 

6223 IR-I 

6230 DY-Y2-Y1 

6240 IF R«-"«" THEN Ll-li L2-PCi GOTO 6270 

6250 R-VAL<R«) 

6260 L1-RIL2-R 



|Hl«(Il)lSOT0 1000 



(Contimu 
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6270 FDR N-Ll TD L2 

6273 IF T(N,I)-0 THEN 6330 

6280 FX-T<N,I+9>/T(N,I> 

6283 PR I NT3SL, "CALCULATING FDR ROW " | N 

6290 SOSUB 9000 'NAT.LN 

6300 X-FN/DY 

6310 SOSUB 9200' EXP 

6320 RT(N)-(EX-1)*100 

6330 NEXT N 

6340 SOSUB 6360 

6343 SOSUB 6420 

6330 RETURN 

6360 CLS 

6370 PRINTS>4,H1*<IR> 

6380 PRINT311.Y1 

6390 PRINT318.Y2 

6400 PRINT323, "RATE" 

6410 L-32 

6413 RETURN 

6420 FOR R-Ll TO L2 

6430 PRINT»L,RjPL*(R> 

6440 PRINT3L+11,T(R, IR) 

6430 PRINT3L+1S, T(R, IR+9) 

6460 PRINT3L+23, INT (RT <R) * 10+. 3) /10 

6470 L-L+32 

6472 IF L<480 THEN 6480 

6474 Q»-INKEY* 

6476 IF Q«-"" THEN 6474 

6478 SOSUB 6360 

6480 NEXT R 

6490 RETURN 

6300 REM DATA 

6303 PRINT3SL 

6310 PRINT3SL, "c-d«ta ROW<*),ITEM #"| 

6520 INPUT R», I 

6330 IF R«-"t" THEN Ll-llL2-PCl SOTQ6360 

6340 R-VAL(R») 

6330 Ll-RiL2-R 

6360 I 1— I 

6S70 ON I SOTO 6380,6390,6600,6610,6620,6630,6640,6630,6660 

6380 V1-2iV2-6jEQ-4iGOT0 6670 

6590 Vl»-" <3) , "I V2«-" (4)8, <3) , " l V3«-" < 1 ) " i S0T06730 

6600 Vl-2lEQ-3l SOSUB 23001 SOTO 6670 

6610 Vl-2iV2-3iEQ-liQ0T06670 

6620 Vl-2iV2-4lEQ-llGOT06670 

6630 Vl«-"(l),"lV2«-"(8)i<<9),"i V3«-"(7)"iB0T0 6730 

6640 V 1 -6 l EQ-3 l S0SUB2S00 l G0T06670 

6630 Vl-6iV2-9lEQ-llG0T06670 

6660 Vl-6iV2-8lEQ-liG0T06670 

6670 IF PS>3 THEN V1-V1+9I V2-V2+9I I 1-1 1+9 

6680 FOR R-Ll TO L2 

6690 ON EQ GOTO 6693,6710,6713,6723,6728,6703 

6693 IF T(R,V2)-0 THEN 6730 

6700 T(R, I1)-T<R,V1)/T(R,V2) iQOTO 6730 

6703 T(R,U)-T(R,V1)*T(R,V2) 

6706 SOTO 6730 

6710 T(R,I1)-T<R,V1)*T(30, I 1 ) /100lB0T06730 

6715 IF 3M(Vl)-0 THEN 6730 

6720 T(R, I1)-100*T(R, Vl)SM(Vl) iFS-0 

6721 SOTO 6730 

6723 IF T(R,V1)»0 THEN 6730 

6726 T(R,I1)-100*T(R, V2)/T(R,V1) l SOT06730 

6728 T(R, Il)-T(R,Vl)*T<R,V2)/100lQ0T0 6730 

6730 NEXT R 

6740 RETURN 

6730 PR I NT3BL, "CONSTANT " I Vl«| V2«| V3« 

6760 INPUT VI 

6770 IF Vl-3 OR Vl-7 THEN EQ-2l GOTO 6670 

6773 IF Vl-1 AND 11-6 THEN V2-2i EQ-5l GOTO 6670 

6773 IF Vl-1 THEN V2-6i EQ-4iG0T0 6670 

6780 IF Vl<>4 AND Vl<>8 THEN 6750 

6790 V2-V1+1 

6800 EQ-6 

6B20 SOTO 6670 

6900 REM PROJECTION 

6901 W-0 

6902 Y4-Y2 

6903 PRINT3BL,"c projection ROWU OR S) , ITEM, RATE"| 

6908 INPUT R«,I,RT» 

6909 IF RT«-"R" THEN 3200 

6910 RT-VAL<RT«> 

6911 IF R»<>"*" THEN 6917 

6912 CLS: PR I NT "ENTER RATE-FOR ")H1«(I> 

6913 FOR W-l TO PC 

6914 IF RT$»"R" THEN RT-RT (U) i S0T06916 
6913 R«-STR»(W) i PRINT W| PL* (W) | : INPUT RT 

6916 R»-STR«(W) 

6917 Rl-l+RT/100 
6920 DY-ABS(Y2-Y1) 
6925 S-l/Rl 

6930 FOR N-0 TO DY 

6935 S-S*R1 

6940 NEXT N 

6943 IF Y2-YK0 THEN S-l/S 



(Continued) 



SAVE 

The save routine stores data for a 
complete year on cassette tape. The 
routine must be entered from MAIN 
CONTROL. Entering SAVE will result 
in the response: 

SAVE WHICH YEAR? 

The year to be stored is entered 
(followed by the enter key). If the 
entered year does not correspond to 
either the primary or secondary years, 
the display will print "DATA NOT 
AVAILABLE" and return to MAIN 
CONTROL. 

If a valid year is entered, the in- 
struction "REWIND TAPE & PLAY" 
will be issued. The computer will 
search for the appropriate space on the 
tape assigned to that year (see Tape In- 
itialization) and then prompt the user 
with "SET TO RECORD "& ENTER 
'READY' ". Following this instruc- 
tion the data is stored on the tape. The 
user is then instructed to "TURN 
RECORDER OFF" and control is 
returned to MAIN CONTROL. 



Tape Initialization 

Data is stored on a year-by-year 
basis, in a file named "F", followed by 
the year (e.g., "F1983"). The data for 
each year is spaced on the tape to allow 
sufficient room for updating by using a 
"header" file (named "H" followed by 
the year) preceding each data file. If a 
new data tape is being used, or if a dif- 
ferent year is being stored than has been 
previously stored, the tape must be pre- 
pared to accept the data. This may be 
done with the following procedure: 

1. Advance the data tape to that loca- 
tion where the new yearly data is to 
be stored. 

2. Set the tape recorder to the record 
mode. 

3. Return the program to the MAIN 
CONTROL routine. 

4. Enter "HEADER". 

5. Enter the year when requested. 

The program will write the Header 
file and return to MAIN CONTROL. 
Continue with: 

6. Enter "SAVE". 



No. 52 - September 1982 



MICRO - The 6502/6809 Journal 



75 



7. When requested with "SAVE 
WHICH YEAR", enter the year, 
followed immediately with an "X" 
(e.g., "1983X"). 

8. Enter "READY" when requested to 
do so. 

9. Turn off the recorder when 
instructed. 

The data has now been stored on 
tape and the program will return to 
MAIN CONTROL. 



Summaiy 

The Market Projection Program 
operates on a 16K Radio Shack Color 
Computer with Standard BASIC ROM, 
rather than the Extended BASIC ROM. 
Several subroutines were required to 
perform the mathematical operations 
of natural log and exponentiation. The 
program could easily be modified to 
operate with Extended BASIC by 
replacing the rather lengthy sub- 
routines with their simple instruction 



AT LAST... HDJ 

For investors 

and financial managers 

Stock portfolio analysis 

S150.00 

• in your office - instant valuations 

•compound growth measurement 

•pertinent company operating statistics 

Stock financial 

statement analysis 

$250.00 

•input your interpretation 

of financial data 

•analyze up to 10 years of data 

•see mean, trend and stability 

On-line data retrieval 

S50.00 

Accounting package 

S 150.00 

DBM system 

S200.00 

for 8" floppy/hard disc 

under OS65U 

1?ti$ Full Screen Editor 

W> for Polled Keyboard 

S75.00 

•for OS65D & OS65U 

• machine language based 

•type or cursor mode 

write for details 

Genesis Information 
Systems, Inc. 

P.O. Box 3001 • Duluth, MN • 55803 
Phone 218/724-3944 



Appendix A (continued) 

6930 IF R«-"8" THEN L1-1iL2-PCi QOTO 6963 

6933 R-VAL<R«> 

6960 Ll-RlL2-R 

6963 FOR N- LI TO L2 

6970 T<N,I+9)-8$T<N,I) 

6973 NEXT N 

6980 IF WOO THEN NEXT U 

6982 IF Y20Y4 THEN CLSIPRINT8493, Y4|QOT02023 

6983 80T0 2000 
7000 REM ENTER 
7003 F8-0 

7010 PRINT8BL,"e R0W<* OR YR),ITEM « < I ) , VALUE " 
7013 PRINT" <OR ' YR' , , YEAR) »| 

7020 INPUT R«,I«,V 

7021 IF R«-"Q" THEN 1000 

7023 IF I«-"»'' THEN 7300 ELBE I-VAL<I«> 

7023 II" I 

7026 IF PB>3 THEN I-I+9 

7030 IF R«-"«" THEN 7090 

7040 IF R«<>"YR" THEN 7070 

7030 IF PQ<4 THEN Yl-V ELSE Y2-V 

7060 QOTO 7200 

7070 R-VAL<R*> 

7080 T<R, I)-V 

7083 QOfO 7200 

7090 CLS 

7100 PRINT"ENTER VALUE8 FOR "|H1«<I1> 

7110 FOR L»l TO PC 

7120 PRINT L|PL*<L)| 

7123 PRINT • PV-"T<L, I)|i INPUT T« 

7130 IF T«-'V" THEN 7140 

7133 T<L, I)-VAL<T«> 

7140 NEXT L 

7200 QOTO 2000 

7300 R-VAL(R«> 

7310 IF PB>3 THEN Il-10lI2-lB ELSE Il-liI2-9 

7320 CLS 

7330 PRINT "E- "|PL«(R)|YR 

7340 FOR I- II TO 12 

7330 PRINT H1«<I)| 

7360 INPUT T(R, I> 

7370 NEXT I 

7380 QOTO 2000 

8000 REM PRINT 

8010 IF YR-Y1 THEN F-0 ELSE F-9 

8020 PRINT«-2,YR|H1«| 

8030 PRINT#-2,TAB<22> H1«<1) 

8030 FOR N-l TO PC 

8060 Dl-INT(T(N,l+F)tl00+.3>/100 

8063 PRINT»-2,CHR«(0) | 

8070 PRINT»-2,N|PL«(N>|" 

8080 PRINT#-2,TAB(24) Dl 

8090 NEXT N 

8091 PRINT#-2 

B092 PRINT#-2, "SUMMATION"! 

8093 PRINT#-2,TAB<24> INT(SM(1+F) *100+.3> /100 

8094 PRINT#-2,PT| "TOP-DOWN TOTAL" 
8093 PRINTU-2, " DELTA" 

8100 FOR D2-1 TO 3 STEP 4 

8110 PRINT#-2 

8120 PRINT«-2 

B130 PRINT#-2,YR|H1«(D2+1)| 

8140 PRINT#-2,TAB(11) H1*<D2+2)| 

B130 PR INT#-2, TABUS) H1*(D2+3)| 

8160 PRINT#-2,TAB(23>Hl«(D2+4) 

B170 FOR N-l TO PC 

B180 FOR K-l TO 4 

8190 I-K+F+D2 

8200 TM(K)-INT(T(N,I>*100+.3)/100 

8210 NEXT K 

8213 PRINT#-2,CHR«(0>| 

6220 PRINT#-2,N|TM(1>| 

8230 PRINT#-2,TAB(11> TM(2)| 

B240 PRJNT#-2,TAB(18> TM(3)| 

8230 PRINT«-2,TAB(24) TM<4) 

8260 NEXT N 

8270 PRINT#-2 

B273 PRINT#-2, "SUM"| 

8280 FOR K-l TO 4 

8290 PRINT#-2,TAB((K-l)«7+3) INT(8M(K+F+D2)*100+.3) /100| 

S300 NEXT K 

8310 PRINTM-2 

8320 PRINT«-2,PT|T(PT,F+D2+1) 

S323 D3-INT((T(PT,F+D2+1)-8M(F+D2+1) ) *100+.3> /100 

8330 PR I NT#-2 , " DLT " | D3 

B300 NEXT 02 

8600 QOTO 2000 

9000 REM LOB 

9010 FM-1 

9020 IF FX-<10 THEN 9060 

9030 FX-FX/10 

9040 FM-FMI10 

9030 GOTO 9020 
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counterpart. There are also other com- 


9060 


SOSUB 9110 


mand substitutions, such as providing 


9070 
9080 


IF FM<10 THEN RETURN 
FN-FN+FD 


formatted output, which would shorten 


9090 


FM-FM/10 


the program. The difficulty with perfor- 


9100 
9110 
9120 


80T0 9070 

FK-(FX-1)/(FX+1) 

F2-FK*FK 


ming these changes, of course, is that 
the program will no longer run with a 


9130 


FZ-1/51 


computer which only has the Standard 


9140 
9130 


FOR F-49 TO 1 STEP-2 
FZ-1/F+FZ*F2 


BASIC ROM. 


9160 


NEXT F 




9170 


FN-FZ*FK*2 




9180 


RETURN 




9200 


REM EXP 


The listing for the program is given 


9210 
9220 


Z"l 
EX-0 


as Appendix A. To customize the pro- 


9230 
9240 
9245 


FOR XE-1 TO 30 

EX-EX+Z*X/XE 

Z-Z*X/XE 


gram to specific market areas, the prod- 
uct categories of interest should be 


9230 


NEXT XE 


entered on lines 340 through 400. The 


9235 
9260 
9300 


EX-EX+1 

RETURN 

REM ROUND-OFF CALCULATE 


number of categories should be entered 


on line 30 as the value of PC (product 


9310 


D-INKT (DR. DI>*100+. 51/100 


categories). The program will accept 


9320 
10000 


RETURN 

REM HEADER PREPARE 


any number of categories,- however, the 


10010 


CL8 


amount of memory required for opera- 


10020 
10030 


PRINT8SL,"YEAR"| 
INPUT YS' 


tion will increase or decrease according 


10040 


OPEN "0",-l, "H"+STR»<YS> 


to the category quantity. 


10050 


PRINT#-1, "HEADER", YS 




10060 


CLOSE- 1 




looeo 


DL-500 




10090 
10100 
11000 


Y1-Y8 

GOTO 1000 

PRINT98L, "CLEAR WHICH YEAR- 






11010 


INPUT Y 


The author may be contacted at Motorola 


11020 


IF Y-Yl THEN Kl-1 l K2-9| GOTO 11100 


Inc., Semi Conductor Products Sector, 


11030 


IF V-V2 THEN Kl-lOl K2-18l GOTO 11100 


5005 East McDowell Rd., Phoenix, 


11040 
11100 


PRINT "YEAR NOT IN DISPLAY"! GOTO 2000 
FOR N-l TO PT 


Arizona 85008. 


11110 


FOR I"K1 TO K2 




11120 


T(N, D-0 




11130 


NEXT I 




11140 


NEXT N 


JMCftO 


11150 


GOTO 2000 





AIM 6809??? 

UpqRAdE Your AIM 65* 
to 6809 CPU Power wnh "MACH-9"! 

STANdARd: *6809 CPU & Plug-in Assembly 
*Super-set of AIM Monitor 
*Two-Pass Symbolic Assembler 
'Complete Monitor Documentation & Source 

HOBBYIST ANd INDUSTRIAL Versions 
AvaHadIe Now: 

HOBBYIST includes hardware as a kit using AIM ROM 
sockets $199.00 (add $2 for shipping and handling). 

INDUSTRIAL is preassembled and pretested with local 
BUS, 5 locking low force ROM sockets and 2K Static RAM 
$279.00 (add $2 for shipping and handling). 

IfMMEdiATE Future: 

*STC FORTH System with Virtual Disk 
*A Fantastic Pascal System 

M.M.S. Inc. 

1110 E. Pennsylvania St. 

Tucson, AZ 89714 

(602) 746-0418 



AZ residents include 4% sales tax *A trademark of Rockwell Inc. 



*•••••••*•••• •• •••••••••••••••• 



from 



+ POWER 
COMPUTECH 



All prices 
postpaid 

(Continents 
U.S.- 
otherwise 
*2 credit) 




Check the 
outstanding 
documenta- 
tion supplied 
with AIM65! 



•••••••*••••• •••••••••••••••••! 



Top quality power supply designed to Rockwell's specs for fully 
populated AIM65 — includes overvoltage protection, transient sup- 
pression, metal case and power cable: 

PSSBC-A (5V 2A Reg; 24V ,5A Avg, 2.5A Peak, Unreg) .... "64.95 
Same but an extra AMP at 5 volts to drive your extra boards 
PSSBC-3 (5V 3A Reg; 24V .5A Avg, 2.5A Peak, Unreg) .... '74.95 
The professional's choice in microcomputers: 

AIM65/1K RAM M29.95 BASIC (2 ROMS) •Sg.gs 

AIM65/4K RAM «464.95 ASSEMBLER (1 ROM) •32.95 

FORTH (2 ROMS) '59.95. 

SAVE EVEN MORE ON COMBINATIONS 

AIM65/1K+PSSBC-A... '479.95 AIM65/4K+ PSSBC-3 ...'524.95 
We gladly quote on all AIM65/40 and RM65 items as well. 

ORDERS: (714) 369-1084 

P.O. Box 20054 • Riverside, CA 92516 
California residents add 6% sales tax 



* 
* 
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PET Vet 



By Loren Wright 



Carl Moser's MAE and ASM-TED 

MAE and ASM-TED have been around 
since the early days of the PET. Other 
assemblers have come and gone or faded 
into obscurity, but few others have 
been able to match the prices, features, 
and support of these assemblers. 

Both are written in machine lan- 
guage. ASM-TED is primarily intended 
to operate in a cassette environment 
with 16K or more. MAE requires a disk 
and 32K. The syntax and operation are 
nearly identical. Both are available for a 
number of other 6502 machines, which 
comes in handy when transferring pro- 
grams from one machine to another. 

MAE is a macro assembler. Macros 
allow you to assign a name to a fre- 
quently used sequence of instructions. 
Each time you want to include this se- 
quence later in your program, you in- 
struct the assembler to expand the 
macro you name. This can save a lot of 
time on large programming projects. 

Another powerful feature of MAE is 
conditional assembly. One popular ap- 
plication of this capability is to allow 
one source listing to generate different 
object files, depending on which ROM 
set you have. 

Another feature is interactive assem- 
bly, where the assembler pauses to get 
some input from the user before it con- 
tinues assembling. MAE supports labels 



up to ten characters long, and the editor 
allows extensive, convenient file editing. 

MAE coexists with BASIC, an ex- 
tended monitor, and your assembly pro- 
gram, if you haven't decided to assem- 
ble it on top of the assembler! To han- 
dle such problems and to allow greater 
programming flexibility, a relocating 
loader program is included. The loader 
acts upon a relocatable object file, 
which is easily created by the assem- 
bler. An enhanced DOS wedge program 
is included, which allows you to enter 
the assembler, loader, or extended 
monitor (also included on the disk), 
with a two-letter abbreviation, such as 
'AW for 'assembler warm-start.' 

The assembler offers a wide variety 
of pseudo-ops, including codes to han- 
dle data, address, and word storage; 
listing generation; assembly from a se- 
quence of modules with a control file 
(not implemented in ASM/TED); as 
well as the macro, conditional assem- 
bly, and interactive assembly com- 
mands, and the more usual pseudo-ops. 

Unlike the standard three-letter 
syntax, MAE uses two-letter codes, 
preceded with a period. For instance, 
instead of ORG, MAE uses .BA (begin 
assembly.) 

There are other deviations from nor- 
mal 6502 assembler syntax. Page zero 
labels must be preceded with an aster- 
isk. To specify the high byte of a label, 
the syntax is: #H, Label. It is also im- 
portant to distinguish in the equate 
portion of the file between label refer- 
ences internal and external to the pro- 











Sample MAE Listing 


:inuBiawia;3«aif=Ji=H 












00 1 


USRVEC -DE *01 








0020 


SCREEN -DE *S0O8 








0030 












0040 


.BB 


S360 ; 2ND CASSETTE BUFFER 








0050 


. OS 










0060 


■ 




8360- 


Hy 


00 


0070 


I HIT 


LDB #L, SCREEN 


0362- 


85 


01 


0080 


STB 


#USRVEC 


0364- 


H9 


80 


0090 


LDB 


#H. SCREEN 


0366- 


85 


02 


1 00 


STH 


*USRVEC+1 


0:368- 


H0 


00 


1 1 


LDV 


#0 


036H- 


V;. 




0120 


LOOP 


TVfl 


036B- 


91 


01 


1 30 


STH 


< USRVEC > -V 


036D— 


88 




0140 


DEV 




036E- 


DO 


FH 


0150 


BHE 


LOOP 


0378- 


00 




1 60 
1 70 


ERK 
.EN 





gam, particularly if the relocating 
loader is to be used. These variations, 
learned quickly, were included to in- 
crease the speed and flexibility of MAE 
and the relocating loader. 

Several utility and sample programs 
are included on the disk. The manual is 
thorough, including examples of 
macro, conditional, and interactive 
assembly. EHS publishes a newsletter 
on an irregular basis to keep users up on 
improvements, applications, and other 
information of interest to MAE owners. 
Finally, there is a large and very active 
users' group dedicated to Carl Moser's 
assemblers and assembly-language pro- 
gramming on the PET. They maintain a 
large disk library of assembly and other 
PET programs. 

ATUG Disk Exchange 
c/o Brent Anderson 
200 S. Century 
Rantoul, IL 61866 
(217) 893-4577 

MAE and ASM-TED are available 
from Eastern House Software (3239 
Linda Drive, Winston-Salem, NC 
27106). MAE comes on disk for 
$169.95, and ASM-TED on cassette for 
$49.95. Specify BASIC ROM and disk 
format. 

The Transactor is Back! 

After a brief absence, The Transactor 
is back. Commodore decided to discon- 
tinue publishing it after Volume 3. Karl 
Hildon has left Commodore to con- 
tinue as editor of the new Transactor, 
now under the auspices of Canadian 
Micro Distributors. The new publica- 
tion will undergo some changes, in- 
cluding a glossier presentation, adver- 
tising, and a more reference-oriented 
format. Most of the same authors will 
continue to contribute. A subscription 
to Volume 4 is $15 US or Canadian. 

The Transactor 
Canadian Micro Distributors 
500 Steeles Avenue 
Milton, Ontario L9T 3P7 
Canada 

Midnight Software Gazette and 
The Paper Merge 

The Midnight Software Gazette, 
now published by the Central Illinois 
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PET Users' Group on a SASE basis, and 
The Papei, now published by Ralph 
Bressler, have merged. The name of the 
new publication will be determined by 
the results of a reader contest, in which 
the grand prize will be a VIC. Current 
Papei subscriptions will be fulfilled 
with issues of the new publication. A 
six-issue subscription is $20 — US, 
Canada, and Mexico; $30 — foreign 
surface,- and $40 — foreign air mail. As 
with the Midnight Software Gazette, 
the new publication will be mailed 
First Class. Advertising is $25 per 
quarter page. 

Midnight Software Gazette 

(for the moment] 
c/o Jim Oldfield 
635 Maple Street 
Mt. Zion, IL 62549 



Othei Commodore-oriented 
Publications 

The Code Works has decided to 
discontinue publication of its famous 
Cursor cassette magazine until the new 
Commodore-64 is released. In the mean- 
time, they will publish a newsletter. 



Another new Commodore-oriented 
newsletter is being published by Roger 
Olanson. Further information was not 
available at press time. 

Strictly Commodore 
47 Coachwood Place, N.W. 
Calgary, Alberta T3H 1E1 
Canada 



The Whole PET Catalog 
Now Available 

The Midnight Software Gazette has 
published a book called The Whole 
PET Catalog, which will include the 
contents of all of the first seven issues 
of Midnight, plus what would have 
been issue number 8. The material has 
been updated, edited, and reorganized. 
In addition there will be full listings of 
the contents of both the ATUG and 
TPUG libraries. The price for The 
Whole PET Catalog is $10 from the 
above address or it may be obtained 
from AB Computers (252 Bethlehem 
Pike, Colinar, PA 18915, (215) 
822-7727), Professional Computer 
Sales (117 Skyway Avenue, Toronto, 
Ontario, Canada, (416) 675-7818), and 



other dealers. Midnight has concen- 
trated on reviews and news,, so it will 
be useful to see it all in one place. 

Patch for 2031 
with Upgrade BASIC 

Willi Kusche (creator of KMMM 
Pascal, reviewed here in the January 
issue) of Bellwamr, NJ reports a prob- 
lem in the operation of the CBM 2031 
single disk drive with Upgrade ROM 
(3.0) PETs. He has provided the follow- 
ing patches to the $F000 ROM: 



F17F 


4C ED FF 


F182 


EA 


FFED 


AD 40 E8 


FFF0 


29 FB 


FFF2 


8d 40 E8 


FFF5 


A9 5F 


FFF8 


4C 87 F1 



You can program a substitute 
EPROM yourself, or he will provide 
one for $15: 



WILSERV INDUSTRIES 
P.O. Box 456 
Bellwamr, NJ 08031 



JNCftO 



• ADVENTURE SERIES SOFTWARE • 
MACHINE-CODE TRACER • NEWSLETTERS 
6800/6809 SOFTWARE* GRADE REPORTER 
OSI GAMES • STATES & CAPITOLS DRILL 
HARDWARE PRODUCTS • ACCESSORIES 
ALGEBRA LESSONS* EXPANSION BOARDS 
PET SOFTWARE • AIM REAL TIME CLOCK 
• JOYSTICK INTERFACES • 

Each month MICRObits brings you a 
wide selection of items for sale. (See 
page 29 in this issue for this month's 
selection.) 

To place an ad in MICRObits, send your 
40-word typewritten ad along with 
$25.00 to reach MICRO by the 20th of 
the second month before publication 
(by September 20th for the November 
issue). 

Send to: MICRO INK 
MICRObits 
34 Chelmsford Street 
Chelmsford, MA 01824 
(617)256-5515 



OSI BASJC 

Summary Manual 

The necessity for the serious programmer; 
a summary of commands, statements, 
peeks and pokes, error msgs, system limits, 
ASCII code (alpha and numeric sequence); 
65D V33,65U-V1.3 

Included are algorithms and hints for the 
C1, C4, C8and C3. 

Things you wanted to know, but had no 
one to ask. 

Twenty-one packed pages at less than 
$1. each! - $19.95. 

(Indiana residents add 4% sales tax) 

C & J Supply 

Box 806, Marion, IN 46952 
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Double-Entry Formatting for 
Your Checkbook on the C I P 



by Leo Jankowski 



A simple checkbook balancing 
program for the C1P Is 
presented. The program Is easily 
modified for other applications 
and computer environments. 

Double Entry 

requires: 

OSI C1P 

Cassette unit (optional) 

Epson MX-80 (optional) 



A drawback to many checkbook bal- 
ancing programs is that they are more 
difficult to use than the pencil and 
paper approach! After all, you just need 
a credits column, a debits column, 
their totals, and difference. 

This program, designed primarily 
for use with a printer, provides this in- 
formation. As is, the program is not 
concerned with check numbers, but if 
needed, they could be input as another 
column of (unformatted!) figures. The 
program could be easily adapted for 
other uses that require simple double- 
entry bookkeeping. By changing the 
headings to, say, GROSS PAY and 
TAX, a record could be made of pay- 
checks and tax-bites due. 

The user is given a choice of one en- 
try per line or two. Every line used is 
numbered. Entries can be positive or 
negative, and in any format. Leading 
zeros can be omitted. The decimal 
point is not mandatory for dollar-only 
amounts. The only drawback is that 
the largest amount or total must be less 
than or equal to 9999.99. The C1P 
rounds off to seven significant figures 
or more, which introduces small arith- 
metical errors. 

No entry-error checking routine is 
provided. Peculiar printouts will follow 
entries like 45.006! An error routine 
would have made the program unneces- 
sarily complicated. The character codes 
in line 3080 are for the Epson MX-80. 
All lines containing REMs can be 



Sample Runs 



••• DOLLAR AMOUNT *** 



TOTAL 



LINE 



CREDIT 



DEBIT 



34.56 

569.20 

234.56 

56.70 

456.12 



34.54 
45.60 
56.70 
3.45 
56.78 



TOTALS 


» 1351.14 - * 


197. 09 


= » 


1134.09 






**« DOLLAR AMOUNT 


••• 




TOTAL 


LINE 


CREDIT 


DEBIT 




NET 



2300.34 

450. lO 

34.40 

OO.OJ 



34.50 
23. lO 
12.00 



» 2791.25 



69.60 



* 2721.63 



removed without affecting the pro- 
gram. Also, lines 3070 to 9998, and line 
140, could be omitted without affecting 
the guts of the program. 

Changing line 1 70 to 1 70 READ CA, 
allows you to use the program with 
DATA statements that have been added 
to the listing or that are to be read in 
from tape. 



Mr. Jankowski has been involved with 
computers for 12 years. He now owns a 
Superboard and has several projects 
underway, including writing programs to 
teach Statistics and to keep stock records 
in fanning. He may be contacted at Otaio 
RD1, Timaru, New Zealand. 



Important Variables 



c$ 


clear screen 


CO 


column 


EN$ 


one entry per line or 




two 


FF 


counter for Form Feed 


FL 


form length 


MU$ 


money string to be 




formatted 


N 


line number 


NSUM 


negative, 2nd column 




sum 


PSUM 


positive, first column 




sum 


POKE 517,255 


printer ON 


POKE 517,0 


printer OFF 
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Listing 1 



10 P0KE515,0:REM turn off LOAD. 

90 EN*="Y" 

10O FF=9:CO=22:FL=61:BL*=CHR*(32> 

110 C*=CHR*(127> :L*=CHR*(10>:CR*=CHR*(13> 

120 F r H*="CREDIT":SH*="DEBIT":TH*="TOTAL ,, :XH*="NET" 

125 : 

130 : 

135 REM Go for Instructions 8c print headings. 

140 G0SUB40O0:GOSUB3070 

141 : 

145 i 

146 REM Turn Printer OFF & ask for Input. 
ISO CO=22:POKE517,0 

170 INPUT" Cash amount ";CA: PR I NT 

180 CENTS=CASH*100 

190 IFCA>0THENPSUM=PSUM+CENTS«6OSUB7OO:GOT015O 

200 I FCA< OTHENNSUH=NSUM+CENTS : C0=45 : GOSUB700 : GOTO 1 50 

210 : 

220 REM CA Must be 

240 REM Turn Printer ON. 

250 POKE517,255:PRINTL* 

300 GOSUB200O: GOT0900 

400 : 

500 : 

600 REM Decide where to print next amount. 

700 POKES 17, 255 

710 IF EN*="N"THENPRINTCR*:SOT0760 

720 I FCA >0THENPR I NTCR* : GOT0760 

750 I FPE >0 ANDCA< 0THENC0=22 : GOTO805 

755 CO=22:IF PE<0ANDCA<0THENPRINTCR*:C0=45:GOTO760 

758 CO=45 

759 REM Line number. 

760 N=N+1:PRINTN; 

800 : 

801 REM Format the cash amount. 
805 POKES 17,0 

80S MUNNY*=STR*CCE>:L=LEN(MUNNY*> 

810 I FL=3THENL=5 : MU*= " 00 " +R I GHT* ( MU* , 2 > : GOT0855 

820 I FL=2THENL=4 : MU*= " 00O " +R I GHT* ( MU* , 1 > : G0T0B55 

830 I FCE< 0ANDL=3THENMU*= " 00 " +R I GHT* ( MU* , 2 > : G0T08S5 

840 IFCE<0ANDL=2THENMU*="000"+RIGHT*(MU*,l):GOTOS55 

845 MU*=RIGHT*(MU*,L-1> 

855 L=LEN(MU«) 

870 P0KE517.255 

872 FF=FF+1:IF FF=FL THEN PRINTCHR*( 12) 

874 REM Form-feed ? 

875 FF=FF+1:IF FF=FL THEN PRINTCHR* ( 12) 

876 REM Print the formatted amount. 

880 PRINTTAB(C0-L>LEFT*(MU*,L-2)"."RIGHT*(MU*,2>; 
890 PE=CA: RETURN 

895 5 

896 : 

897 REM Last amount was 0, so now print totals. 
900 PRINTBL*:PRINT"TOTALS"; 

905 CENTS=PSUM : PR I NTTAB (14)"*";: GOSUBB05 

910 CO=45 : CENTS=NSUM : PR I NT TAB ( 34 ) " - * " ; : G0SUBB05 

920 C0=67:CENTS=PSUM+NSUM:PRINTTAB(56>"= *"; 

927 GOSUB805:PRINTBL* 

923 GOSUB2O00 

935 PRINTCHR* (7) : PRINTCHR* (12) 

940 POKE517,OsGOT09999 

100O : 

1500 ; 

1600 REM Print a line. 

20OO FORX=lT071:PRINT"- H ; : NEXT: PRINTBL*: RETURN 

2010 : 

2020 : 

3050 REM Print headings. 

3070 POKES 17, 255 

3075 REM Commands to EPSON 80 Printer. 

30e© PRINTCR*:PRINTCHR*(27) ; : PRINTCHR* (69) 

3090 G0SUB2OOO 

3100 PR I NTTAB (17 >"*** DOLLAR AMOUNT ***"; 

3110 PRINTTAB(6S>TH* 

3120 BOSUB20001PRINTL* 

3130 PRINT" LINE"TAB(17>FH*TAB(41>SH*TAB(67>XH* 

3140 GOSUB2OO0:PRINTL* 

3150 P0KE5 17,0: RETURN 

3500 : 

3600 : 

3610 REM Instructions. 

4000 PRINTC* 

4010 PRINT" When prompted enter " :PRINT 

4020 PRINT" your money amounts. ": PRINT 

4030 PRINT" They can be negative" 

4035 PRINTiPRINT" or positive." 

4O40 PRINT:PRINT:PRINT" Last amount must be O. " 

4O50 PRINT:PRINT:PRINT:PRINT 

4O60 INPUT" Two entries per line";EN* 

4O70 IF LEFT*(EN», 1 > ="N"THENEN*="N" 

4080 PRINTC*: RETURN 

4O90 : 

9998 DATA 

9999 END 



AMCftO 




Let Unique Data Systems help you raise your sights on AIM 65 
applications with our versatile family of AIM support products. 

•Go for high quality with our ACE-100 Enclosure. It accom- 
modates the AIM 65 perfectly, without modification, and features 
easy access two board add-on space, plus a 3" x 5" x 17" and a 
4" x 5" x 15.5" area for power supplies and other com- 
ponents. $186.00. 

• Get high capability with Unique Data System's add-on boards. 
The UDS-100 Series Memory-l/0 boards add up to 1 6K bytes of 
RAM memory or up to 48K bytes ROM/PROM/EPROM to your 
Rockwell AIM 65. You also get 20 independently programmable 
parallel I/O lines with an additional user-dedicated 6522 VIA, two 
independent RS-232 channels with 16 switch-selectable baud 
rates (50 to 19.2K baud), and a large on-board prototyping area. 
Prices start at $259.00. 

• If you need to protect against RAM data loss, the UDS-100B of- 
fers an on-board battery and charger/switchover circuit. $296.00. 

• Heighten your AIM 65's communications range by adding the 
UDS-200 Modem board. It features full compatibility with Bell 
System 103 type modems and can be plugged directly into a 
home telephone jack via a permissive mode DAA. No need for a 
data jack or acoustic coupler. The UDS-200 also has software- 
selectable Autoanswer and Autodial capability with dial tone 
detector. The modem interfaces via the AIM 65 expansion bus, 
with the on-board UARTand baud rate generator eliminating the 
need for an RS-232 channel. $278.00. 

•The UDS-300 Wire Wrap board accepts all .300/.600/.900 IC 
sockets from 8 to 64 pins. Its features include an intermeshed 
power distribution system and dual 44-pin card edge connectors 
for bus and I/O signal connections. $45.00. 

• Get high performance with the ACE-1 00-07 compact 4" x 5" x 
1 .7" switching power supply, delivering + 5V @ 6A, + 1 2V @ 1 A, 
and + 24V for the AIM printer. $1 1 8.00. 

Installation kits and other related accessories are also avail- 
able to implement your AIM expansion plans. Custom hard- 
ware design, programming, and assembled systems are also 
available. High quality, high capability, high performance, with 
high reliability. . . all from Unique Data Systems. Call or write 
for additional information. 

Unique Data Systems Inc. 
1600 Miraloma Avenue, Placentia, CA 92670 

(714) 630-1430 
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ARK COMPUTING 



LOWERS THE BOOM 
ON HIGH PRICES 



SPECIALS 



GAMES 



16K Ram Board $79.95 

80 Column Board (wiz-so) $195.00 

Parallel Printer Interface (w/cabie) $59.95 

(compatible with Pascal, Basic, CP/M) 

Z-80 Softcard $259.95 

Joyport $59.95 

ARK Special $295.00 
(includes Wiz-80, Lazer Keyboard Plus, Lazer 

Lower Case Plus) 

On-Line Systems: General Manager $99.95 

Diskettes w/hubring (10) $19.95 

Hi-Res Secrets $84.95 

Expediter II $59.95 

The Dictionary $69.95 

Microsoft 16K Ram Card $99.95 

Time Zone $69.95 

Lazer Keyboard Plus $69.95 

Lazer Lower Case Plus $44.95 

Lazer Lower Case Plus II $19.95 

Anix 1.0 $34.95 

Lazer Pascal $29.95 
Anix-Pac 

(Anix, Pascal, Sources) $99.95 
Using 6502 

Assembly Language $14.95 

Datamost Joystick $39.95 

Datamost Expandaport $49.95 



HARDWARE 



BUSINESS SOFTWARE 



1?" hi-res green display 

12" io-res color display 

12" hi-res HG8 colof display 

Apple Cat H 

Apple Clock 

Supertalker SD2000 

Romplus 

Horn writer 

Mus'C System 

A/DrD/A 

E>pansion Chassis (1 ?5v) 

CPS Multifunction Card 

flAM Plus t- (32 RAM Doard 

w/i6K installed) 
COPVROM 
KeypoarO Filler ROM 
1 3 Key Keypad |new or oldl 
Bar code reader 
Soilkey (! 5-key user-dehn I 
Asynchronous Serial 
Daiamosi Joystick 
Datamost Expandaport 
M ic romodem 
5manmodem (RS-232) 
Lower Case +(Rv 6&earher| 
Lower Case* II (Rv 7 & lid' 
Lower Case+ l!l(Rv 74 Llr) 
KeyDoard #Plus 
Characier Sel+P'us 
Sop R' Term 80-col board 
Sup R'SwitCherlpwr suppl ) 
A35 35-track disk drive w/o 

controller 
A35 35-lrack disk drive w/ 

controller 
Add 4C-!rack disk drive w/o 

controller 
A40 40-lrack disk drive w/ 

controller 
A70 70-lrack disk drive w/o 

controller 
A70 70-track disk drive w/ 

coniroller 



S28S 00/91 59.05 
$-1 30, 00/9349. 05 
£1095 00/9895.95 
$389 GO /»3 20. 00 

s^«0uu/*io&.y5 

$(9900/9149.95 
$155 00/9124.95 
$175 00/9139.95 
$395 00/9295.95 
$350.00/9249.95 
$750 00/9495.00 
1239 00/8149.95 
$189 00/9139.95 

S55 00/S44.95 

$55 00/S44.95 

£125 00/894.95 

El 95 00/8145.95 

SI 50 00/11 19.95 

$179 95/8129.95 

$59 95/839.95 

$69 95/949.95 

$379 00/8269.00 

$279 00/8109.00 

$64 95/944.95 

$24 95/914.95 

$49 95/834.05 

£99 95/909.95 

$24 95/819.95 

$395 00/82O5.OO 

$295 00/8195.00 

S479 00/9379.OO 

$579 00/9449.00 

$449 00/9359.00 

$549 00/8449.00 

1599 00/8499.00 

5693 00/8599,00 



Mail Label & Filing System 

Payroll 

General Ledger (w/payabies) 

Home Money Minder 

The Mail Room 

CPA i General Ledger 

CPA It Accounr.5 Receivable 

CPA Ml Accounts Payable 

CPA IV Payroll 

CPA V Properly Manage 

TPv Home Accountanl 

Word Star 

Su person 

Mail Merger 

Data Star 

Spells tar 

Ca!c star 

Visicaic jj 

PFS (Personal Filing Sysiemi 

PfS Report 

The Correspondent 

Mailing Lisl Database 

Higher Texi 11 

Di.-pclory ManaQer v? 

Real Estate Analysis Pgm 

PiE WHITER 

Easy Mover dO-column 

£asy Mailer 40-coiymn 

Easy Writer 40-column 

Pro Easy Mailer 

Pro Easy Writer 

Suoer Sena*? II 



S74 95/840.95 

$395 00/9205.00 

$495.00/9395.00 

S3d 95/824.05 

S3a 95/824,95 

S2 1995/9160.95 

$249.95/9189.95 

3249 95/8109.95 

$2d9 95/9109.05 

$249.95/8109.95 

$7d.95/954.95 

S3 75.00/91 95.00 

$20000/124.95 

$125 00/979.95 

$300 00/9195.00 

$200 00/9124.95 

$200 00/8124.95 

$250 00/8179.95 

SI 25 007*89.95 

$95 00/909.95 

$59 95/949.95 

£49 95/839.95 

$G9 55/920.95 

529 95/921.95 

30*0FF 

(call for details) 

$49 95/930.95 

$6996/849.95 

$9995/974.95 

$175 00/9124.95 

$249 95/179.95 

$129 95/979.95 



Soft porn Adventure (no grapnicsi 

#0 Mission Asteroids 

# 1 Mystery House 

*2 Wizard & Princess 

43 Cranston Manor 

*4 Uryesses 4 (he Golden 

Fteece 
#5 Time Zone 
Hi- res Cribbage 
Hi-res Soccer 
Hi-res football 
Sabotage 
Jawbreaker 
Threshold 
Missle Oefense 
Crossfire 
Pegasus 
Warp Destroyer 
Star Crusier 
Adventure 
Both Barrels 
Cyber Strike 
Phantoms Five 
Space Eggs 
Autobann 
Pufsar II 
Qrbitron 
Gamma Goblins 
Gorgon 
Sneakers 
EPOCH 

Cops & Robbers 
Outpost 
Dark Forest 
Beer Run 
6org 

Joy Port w/taosball 
Hadron 
Twerps 

Computer Foosball 
Wizardry 
Galactic Anack 
Minator 

Oylmpic Decathlon 
Three Mile Island 
ABM 

Robot Wars 
Global War 
Castle Wollenslein 
Falcons 
Suictde 
Grand Prix 
The 8esi of Muse 
Flight Simulator 
Dungeon Campaign 
Odyssey 

Escaoe From Arciurus 
Palace in Thunaerlana 
MAD Venture 
Roach Motel 
English SAT#| 
U S Constitution 



S29 95/919.95 
Si 9 95/91 4.95 
S24.95/tie.tS 
$32. 95/91 9.95 
$34 95/924.95 
134.95/924.95 

$99.95/969.95 
$24. 95/91 9.9S 
$29.95/919.95 
$39.95/929.95 

$24.95/619,05 
$29,95/91 9.95 
$3995/924.95 
$29.95/919.95 
$29.95/819.95 
$29.95/919.93 
$29 95/921 .95 
$24.95/919.95 
$29.95/921.95 
$24.95/919.95 
$39.95/929.95 
$2995/921.95 
$29.95/919.95 
$29 95/921.93 
$29.95/921 .95 
$29.95/921 .95 
$29 95/919.95 
$39 95/929.95 
$29.95/919.95 
$34 95/324.93 
$34.95/924.95 
$29 95819-93 
$29.95/919.95 
$29 95/919.95 
$29 95/919.93 
$74 95/959.05 
$34.95/924.05 
$29.95/910.95 
$2995/919.93 
$49.95/939.95 
$29.95/921.93 
$34 95/924.95 
$29.95/921 .95 
$39 95/920.93 
$24 95/919.95 
$39 95/929.95 
$24 95/910.05 
$29 95/821.05 
$29.95/921 .95 
$29 95/921 .05 
$29.95/921 .05 
$39 95/820.05 
$33 50/820.95 
$17 50/914.05 
$29 95/921 .05 
$24 95/910.05 
$24.95/910.05 
$24.95/919.05 
$34.95/920.95 
$29 95/821.05 
$29 95/921.05 



UTILITIES 



Hl-Res Secrets [0. Fudge) 

Super Shape Org & Animate 

The Creative Tool Box 

Applesoft Compiler 

Datadex 

Using 6502 Assembly Lang 

ANIX (UNIX-like Oper sysf 

Lazer Pascal 

DOSOURCE 3 3 

Painter Power 

The Voice 

E-Z Draw 

Pascal Graphics Ediior 

ACE 

Apple- DOC 

Lisl'Masler 

ASCII Express 

Z-Term (req's 2-80 Card) 

Z-Term Pro 

Speed Star 

On- Line 

OB Master 



9124.U5/984.95 

$34 95/824.05 
$44 95/834.05 
$175.00/129.05 
$150 00/899.95 
$19 95/914.95 
$49.95/839.95 
$3995/929.95 
$39.95/924.95 
$39 95/929.95 
$39 95/929.95 
$49 95/839.95 
$99 95/969.95 
$39 95/929.95 
$49 95/939.95 
$39 95/929.95 
$79.95/959.95 
$99 95/989.95 
$149 95/999.95 
$134 95/998.95 
$89 95/909.95 
$229 00/9159.95 



Upper Heacnes ol Apshai 

The Keys to Acheron 

Datestonesot Ryn 

Morloc's Tower 

Ricochet 

Startle et Orion 

Invasion Onon 

The Dragon's Eye 

Tues. Morning Ouarterback 

Jabbertalky 

Sorcerer o! Siva 

Rescue at fligel 

Crush, Crumble, and Chomp 

Temple ol Apshai 

Hell lire Warrior 

Star Warrior 

Ht- res goll 

Race lor Midnight 

Midnight Music 

Star Blazer 

Apple Panic 

Space Quark 

Red Alert 

Track Attack 

Genetic Drill 

Arcade Machine 

Raster Blaster 

Trilogy ot Games 

Space Album 

Fender Sender 

3-D Graphics 

Akalaoeth 

Appieoids 

U'itma 

LA Land Monopoly 

Hyper space Wars 

3-D Skiing 

Torpedo Terror 

Computer Bingo 

Kaves Karkhan 

Dragon Fire 

flings ol Saturn 

Alkemslone 

Snack Attack 

Casino 

Thiel 

Counry Fair 

Swashbuckler 

Firebird 

Russki Duck 

Horizon V 

Sargon ll 

Reversal 

Zork 

Zork II 

Pool 1 5 

Shullleboard 

Trick Shot 

Crossword Magic 

Master Type <hr-res) 

Doglighl 

Crown ol Arthain 



$19.95/915.95 
$19 95/815.93 

$19.95/t13.9S 
$1995/915.95 
$19.95/915.93 

$24.95/19.95 
$24.95/919.93 
$2495/919.95 
$29.95/921 .95 

$29.95/21.9* 
$29.95/921.95 
$29.95/121.03 
$29.95/921.93 
$39.95/929.95 
$39.95/929.93 
$39.95/929.93 
$29.95/921 .S3 
$29.95/921.95 
$34.95/924.93 
$31 95/924.93 
$29.95/919.95 
$29.95/91 9.99 
$2995/819.95 
$29.95/919.95 
$29.95/919.93 
$44.95/929.03 
$29 95/921.93 
$29.95/921.95 
$39 95/929.95 
$24.95/919.95 
$39 95/929.93 
$34.95/924.93 
$29 95/921 .93 
$39.95/929.93 
$29.95/921 .95 
$29.95/921 .95 
$24.95/910.05 
$24.95/910.03 
$24.95/910.95 
$49.95/934.93 
$49.95/934.93 
$39 95/929.93 
$39.95/929.95 
$29 95/919.95 
$39 95/924.93 
$29 95/919.05 
$29.95/910.03 
$34 95/924.05 
$29 95/910.05 
$34.95/925.95 
$34 95/925.95 
$34 95/925.95 
S34 95/S25.95 

$39 95/929.95 
$34.95/924.95 
$29.95/921.95 
$39 95/929.95 
$49 95/939.95 
$39 95/929.05 
$29.95/921.05 
$34 95/820.05 



UTILITIES 



LISA v2 5 

LISA Educational Pack 
Speed/ASM 
Expediter H 
Disk Organizer M 
Applesoft Plus 
Applesoll Optimizer 
Disk Recovery 
Multi-disk Catalog 
Back i{ up 
Image Prinler 
Pascal Lower Case 
Dos Plus 

The Original Quick Loadei 
Typing Tutor 
Fortran 
AL.DS 

Bas.'c Compiler 
Cod ol 
TASC 
Jpala Plot 
DB Utility Pack 



$79.95/959. 9! 
$M9.95/979.9i 

$39 95/929.0! 

$99 95/959.01 

$29 95/121.9! 

$24 95/919.9! 

$24 95/919.9! 

$29 95/921.9! 

$24 95/919.9! 

559 95/939.9! 

$29.95/929.9! 

$24 95/919.9J 

$24 95/919.9.' 

$24 95/919.0! 

$24 95/919.9! 
$195 00/9139.9! 
$125 00/989.9.' 
$395 00/9295.0* 
$750 00/9495. 0» 
$1 75 00/9129.91 

S59.95/944.9J 

$99 00/989.9! 



Wa accept: MASTERCARD, VISA (Include card I and expiration date). CASHMER or CERTIFIED CHECKS. MONEY ORDfcHS, or PERSONAL CHECKS (Please allow 10 

days to clear). 

Please add Z a A tor shipping 4 handling (minimum $2.00) Foreign orders please add 10% (or shipping & handling. 

We accept CQQ's (Please Include $200 COO charge). California residents add 6% sales tax. All equipment Is subject to price change and availability without notica. AH 

equipment is new 4 complete with manufacturer's warranty. 

Apple is a registered trademark of APPLE COMPUTER INC. 



YOUR SALVATION IN THE SEA OF INFLATION 

ARK COMPUTING 



P.O. BOX 2025 

CORONA, CALIFORNIA 91 720 

(714) 735-2250 
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Auto SAVE for the PET 



by Louis F. Sander 



This routine makes automatic 
cassette backup copies of your 
PET BASIC programs at regular 
intervals. Properly used, it can 
keep you from losing your 
temper and your creative 
programming work. 



AUTOSAVE 

requires: 

PET with cassette 



This short subroutine averts the 
anguish, anxiety, and anger that result 
from system crashes during BASIC pro- 
gram development. AUTOSAVE makes 
timely backup copies of the work in 
progress. So if you've ever seen your 
best creative effort swallowed up by a 
machine whose keyboard is locked out, 
read on for help. 

You use the AUTOSAVE subroutine 
by putting it at the very end of your pro- 
gram, and by putting a GOSUB call at 
the very beginning. Then each time 
you RUN your main program, which 
you will certainly do as you check the 
lines you are writing, AUTOSAVE will 
be called first. If an hour or half hour 
point has passed since the last SAVE, 
AUTOSAVE will ask you if you'd like 
to make some backup copies. If you 
would, AUTOSAVE will make as many 
as you wish, using a 16-character pro- 
gram name consisting of the date and 
time of the SAVE, plus an eight- 
character identifier chosen earlier by 
you. AUTOSAVE will also give you 
special guidance in handling and mark- 
ing your backup cassette. 

Then, if disaster strikes, just load 
your most recent backup and repeat 
your work since the time of its SAVE. 
In the worst case, you might lose 30 
minutes worth of work. Since each 
backup's name includes the time it was 
saved, the most recent one will be easy 
to find. 



Key AUTOSAVE into your PET ex- 
actly as it is listed, then save it on tape 
for further use. It is important that 
lines 63630 to 63648 take up no more 
than 17 screen lines, so don't use any 
unnecessary spaces in them. The six 
characters immediately after 'BACK- 
UPS' in line 63638 and 'DATE' in line 
63640, consist of three SHIFTED 
SPACES, followed by three CURSOR 
LEFTs. Shifting the spaces is very im- 
portant because it lets you answer an 
INPUT statement by pressing RETURN. 

Line 63630 requires a bit of explana- 
tion. You will normally change this 
line, making TJ$ = the eight-character 
name of your main program. TK is the 
number of saves to be made at backup 
time, which you might also want to 
change. TI% is a POKE location used 
by the subroutine, and TI% = 2 is fine 
unless your main program calls the 
rarely used USR function, which also 



uses location 2. Possible [but untested) 
alternates in this case are TI% = 6 for 
original ROMs and TI% = 15 for all 
others. 

If you are starting your main pro- 
gram from scratch, just load AUTO- 
SAVE before you begin; if the main pro- 
gram is already on tape, add AUTO- 
SAVE with an APPEND program. Or, 
just follow these steps: 



1 . LOAD and LIST AUTOSAVE. Don't 
touch the keyboard after the LIST. 

2. Mount the main program tape in 
TAPE #1, so that the main program 
is the next one on the tape. 

3 . Type LOAD, but don 't hit RETURN. 

4. Press PLAY, then quickly hit 
RETURN. 



63624 REM *** AUTOSAVE SUBROUTINE *** 



LOUIS F. SANDER 
153 MAYER DRIVE 
PITTSBURGH, Pfl 15237 



63626 REM 

63627 REM 

63628 REM 

63629 REM 

63630 T J*= " AUTOSAVE" :TK=3:Ti:;=£:TJ= 1930 
69: I = INT(TI>'TJ>:REf1 *** HUTOSfiVE *** 

63632 IFI + KPEEI«7IS;MHENINPUT"iSaTIME"; 
TK$ : TI $=TK*+ " 08 " : POKET I ": , T I /J J + 1 : RETURN 

63634 IFPEEK<Ti;0=I+lTHEHRETURN 

63635 P0KETI£,I+1 

63636 PRIHT"|ga3TIf1E IS "LEFTSC TI*,4 :> ; 
63638 INPUT". SAVE BACKUPS ISli" ;TK$: I 

FLEFTS<:TK$,1 K>"Y"THENRETURN 

63640 INPUT"K3DfiTE H»" ;TK$ : PRINT"1H2M 
OUHT BACKUP TAPE, THEN HIT *B'" 

63642 GETA*:IFA$<>"B"THEN63642 

63644 TJ$=TK$+LEFT$<TI$,4>+TJ*:F0RI=1T0 
TK : SRVET J* : PR I NT "MS A VED " T J* : NEXT 

63646 PRINT"IS3LABEL TAPE, THEN HIT '!_*" 
:PRINT"rjQ u ,-:GETAt: IFA*<>"L , 'THEK63646 

63648 RETURN 
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5 . When the main program has loaded, 
AUTOSAVE's line 63630 should be 
at the top of your screen. HOME 
your cursor and add the AUTOSAVE 
lines to your program by hitting 
RETURN eleven times. 



Now edit line 63630 so that TJ% = 
the name of your main program, and 
add a GOSUB 63630 as the first line of 
your main program. If for some reason 
you don't expect to RUN your main 
program from the beginning much 
while writing code, put some GOSUB 
63630' s in the program sections you 
will be running. Also finish the main 
program with an END statement to 
keep it from falling through to 
AUTOSAVE. 

Here are some final notes: Entering 
a GOSUB 63636 in immediate mode 
will generate an automatic save at any 
time. Notice that 63636 is a symme- 
trical number, and therefore easy to 
remember. When AUTOSAVE asks you 
for the time, it will only accept 4-digit 
numbers from 0000 to 2359. It will ac- 
cept anything at all as a date, but it's 
really looking for four digits (e.g., 0101 
for New Year's Day). AUTOSAVE's 



special tape handling instructions are 
designed to have you take the cassette 
out of the recorder and label it; both 
steps inspire good operating practice. 
AUTOSAVE has been thoroughly 
tested on an original ROM PET. Since 
it depends on TI$ for its success, if your 
main program alters TI$ or shuts off the 
jiffy clock, AUTOSAVE will not work 
properly. 

If you'd like a detailed description 
of the theory behind AUTOSAVE, just 
drop me a line at the address provided. 



Louis F. Sander designs and markets 
electronic systems for hospitals and other 
health care providers. He is the originator 
of COMPUTER KINDERGARTEN™, a 
computer familiarization course for adults, 
and has written computer-related articles 
for several publications. He has worked 
with electronics since pre-transistor days. 
You may contact Mr. Sander at 153 Mayer 
Drive, Pittsburgh, Pennsylvania 15237. 



JMCftO 



OHIO SCIENTIFIC 

THE WIZARD'S CITY - 

search for gold in the dun- 
geons beneath the Wizard's 
city or in the surrounding 
forest. A dynamic adventure 
allowing progress in strength 
and experience. All OSI — 
cassette $12.95, disk $15.95. 

OSI HARDWARE 15% OFF 
RETAIL PRICES! 

GALACTIC EMPIRE — a strat 
egy game of interstellar con- 
quest and negotiation. Com- 
pete to discover, conquer, and 
rule an empire with the com- 
puter or 1-2 other players. C4P, 
C8P cassette $12.95, disk 
$15.95. 

AIR TRAFFIC ADVENTURE — 
a real time air traffic simula- 
tion. C4P, C8P disks $15.95. 
Plus S-FORTH, PACKMAN, 
CRAZY BOMBER, ADVEN- 
TURE, TOUCH TYPING, IN- 
TELLIGENT TERMINAL and 
more. Send for our free 
catalog including photos and 
complete descriptions. 
(312) 259-3150 
Aurora Software Associates 
fM 37 S. Mitchell 
^™ Arlington Heights 
^_ Illinois 60005 




SIGNALMAN MARK I DIRECT CONNECT 
MODEM - $09.50 

Standard 300-baud, full duplex, 
answer/originate. Powered by 
long lasting 9-volt battery (not 
included). Cable and RS-232 
connector included. 

EPR0MS - HIGH QUALITY, NOT JUNK 

Use with PET, APPLE, ATARI, SYM, AIM, etc 450 ns. $6.50 
for 2716, $12.50 for 2532. We sell EPROM programmers 
for PET and ATARI 



5% inch son 

SECTORED DISKETTES 

Highest quality. We use them on 
our PETs, APPLEs, ATARIs, and other 
computers. $22.50/10 or $44.50/20 



NEW! C. IT0H STARWRITER F-10 
DAISY WHEEL PRINTER 

Letter quality, flawless copy at 40 char/sec. Bidirectional 
printing, 15-inch carriage, uses standard Diablo ribbons 
and print wheels. 

PARALLEL - $1495, RS-232 - $1680, TRACTORS - $210 




MAE SOFTWARE DEVELOPMENT SYSTEM 
FOR PET, APPLE, ATARI 

'The Compatible Assembler" 

• Professional system for development of Machine Lan- 
guage Programs. 31 Characters per label. 

• Macro Assembler/Text Editor for Disk-based systems. 

• Includes Word Processor for preparation of Manuals, etc 

• Standard Mnemonics - Ex.: LDA (LABEL), Y 

• Conditional Assembly, Interactive Assembly. 

• Editor has string search/search and replace, auto line 
numbering, move, copy, delete, uc/lc-capabilrty. 

• Relocating Loader to relocate object modules. 

• Designed with Human Factors Considerations. 

$169J95 

FLASH!! EHS Management has decided to allow $50 00 credit 
to ASM/TED owners who want to upgrade to MAE. Totjet this 
credit, return ASM/TED manual with order for MAE. 

SMARTERM 00 COLUMN CARD 
FOR APPLE -$279 

Upper/lower case and 80 columns. Includes 5x7 matrix 
character set, full ASCII keyboard, and true shift key 
operation. 

TYMAC PARALLEL PRINTER INTERFACE 
FOR APPLE- $119.95 

For use with Centronics, Starwriter, Prowriter, etc. 



PET BASIC SCROLL PROGRAM 

Scroll thru basic program using Cursor up/down keys. 
Specify computer. $6.00 on cassette, $9.00 on disk. 

Flip 'N' File diskette storage case (50-61) disks)- 
$21.95 

Memory Test for Apple on Disk = $9.95, on Tape 
= $6.95 

System Saver for Apple - Fan, Surge Protection, 2 
extra outlets, Apple power cord = $75.00 

BMC Green Screen Video Monitor. 

12 inch CRT, sharp, crisp 40 or 80 column display. 
= $90.00 

DC Hayes Smart Modem = $235.00, Micro Modem 
II = $289.00, Chronograph = $225.00 

C. Itoh Prowriter Printer. Better than MX80. We use 
constantly with our Apple and PET. Can be used on 
IBM, Atari, TRS-80, etc. 1 20 cps, friction and tractor 
feeds, hi resolution dot graphics, nice looking, high 
quality construction. Parallel - $499.00, with IEEE 
interface for commodore - $599.00, RS232 - $660.00 



3239 Linda Dr. 
Winston-Salem, N.C. 27106 
(919)924-2889 (919)748-8446 
Send for free catalog! 
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The chase is on, and you're /'// 



^ 



There are 

secret- hordes 

of cash hidden in 

the city and you intend 

to "liberate" it all. But, 

someone tipped off the killer 

goons and they're hot on your tail. 

Floor that pedal ... burn up the road! 

Oh, oh . . . that's not enough to shake them. 

You need exceptional skill and strategy to lose 

them in the intricate and crazy maze of streets ... 

to force them to crash, to trap them in dead ends. 

they're dead serious - so don't relax Get the cash and head 

out! Where? To another magnificent crazy maze of streets and 

smarter enemies. The better you are the more loot you grab, and the "~^^W N 

more you fight - up to 19 killer cars at a time! ^^^V 

Here's the most intricate hi-res mazes you've ever seen - to challenge your skill, agility 

Q hd thinking ability. Get with CRAZY MAZEY now and run for your life! 

529.95 For Apple li: At you computer store, or from: 



9748 Cozycroft Ave.. Chafsworth. CA 91311 (213) 709-1202 




TURN YOUR APPLE 
PERSONAL COMPUTER 
INTO A PROFESSIONAL 
COMPUTER FOR $750. 



The majority of all professional computer soft- 
ware programs available today are written for the 
CP/M® disk operating system. The SYNERGIZER 
lets you access all of this vast body of sophisti- 
cated software with your Apple II while retaining 
the capability to access your present Apple 
software. 

In addition to the CP/M interface and software 
diskette, the SYNERGIZER gives you 
the required 80 column dis- 
play and 16K RAM 




memory expansion boards, the CP/M Handbook 
by RodnayZaks, and complete manuals. You get 
everything you need for fast, easy installation and 
operation in one package.* Each element is de- 
signed to complement the others, and everything 
is designed and produced by the same company. 

The SYNERGIZER. It'll turn your Apple 
into a professional computer. And it costs only 
$750. Phone or write us, or ask your 
dealer for a SYNERGIZER 
brochure. Now. 



SYNGRGIZBR 



Manufactured by Advanced Logic Systems, 

1195 East Arques Avenue, Sunnyvale, CA 94086, (800)538-8177 (In California (408)730-0306) 

Apple and Apple II are registered trademarks of Apple Computer, Inc. 

CP/M is a registered trademark of Digital Research, Inc., 

The CP/M Handbook is copyrighted by Sybex, Inc 

And the SYNERGIZER was our idea. 

"All SYNERGIZER Components are also sold separately. 



New Publications 



Implementing BASICs, by William 
Payne and Patricia Payne. Reston 
Publishing Co., Inc. 1 11480 Sunset 
Hills Rd., Reston, VA 22090) 1982, 210 
pages, 9!4 x 6 inches, hard cover. 
ISBN: 0-8359-3045-9 

This book is designed to help you 
achieve better software system designs 
and more programming techniques. 

CONTENTS: Language Commands, State- 
ments, and Their Variables; Microcomputer 
Data Structures; Variable Table Structure; 
Common Variables; Lexical Analysis, Text 
Atomization, and Syntax Analysis; Program 
Resolution; Program Text Coordinates; In- 
terpreted Program Execution; Compiled 
BASICS; Verb Failures, User-Defined Verbs, 
and BASIC Line Editor; Timesharing 
Language Systems; Language System Code 
and Its Systems Verbs; How to Write a 
Language System,- Conclusions and 
References; Appendix; Annotated Glossary 
of Techical Terms; Index. 



Apple Pascal: A Hands-on Approach, by 

Arthur Luehrmann and Herbert Peck- 
ham. McGraw-Hill Book Company 
|New York, NY), 1981, 430 pages, 6Yi 
x 9 inches, wire-o binding, paperback. 
ISBN: 0-07-049171-2 $14.95 

A series of sessions (chapters) designed 
to teach you Pascal, in a method simi- 
lar to the way you learned English. The 
14 sessions provide 30 to 40 hours of 
hands-on activities for the Pascal 
novice. 

CONTENTS: Preface; Introduction; Get- 
ting Started; Typing in Programs — The 
EDITOR; Writing, Running, and Changing 
Programs; Generating Sound; Inventing 
New Words: Procedures; More Invented 
Words: Functions; Drawing Pictures; 
Branching Statements: IF and CASE; String 
Variables and WHILE Loops; Number Types 
and Arithmetic; Scalar Data Types and Sets; 
Arrays; Records and Files; Recursion; Where 
Do You Go From Here? Appendixes; Solu- 
tions to Problems; Index; Compiler Error 
Messages. 



pages, 9!4 x 6 inches, paperback. 
ISBN: 0-394-70789-3 $12.95 

In these new Sherlock Holmes Stories, 
the great detective uses a computer to 
analyze clues. Holmes instructs Dr. 
Watson (and the reader) in a way that 
illuminates the mysteries of computer 
programming. 

CONTENTS: The Analytical Engine; 
Murder at the Metropolitan Club; Holmes 
Gives a Demonstration; The Adventure of 
the Bathing Machine; A Study in Cigar Ash; 
The Adventure of Clergyman Petei; 
Holmes's Method Revealed; The Ciphered 
Message; An Advertisement in the Times-, A 
Study in Chemistry; The Coroner's Report; 
The Adventure of the Gold Chip; Holmes 
Delivers a Lecture; The Final Programme; 
Appendix; Postscript; Index. 



Elementary BASIC: Learning to Pro- 
gram Your Computer in BASIC with 
Sherlock Holmes, by Henry Ledgard 
and Andrew Singer. Vintage Books [201 
E. 50th St., NY, NY 10022), 1982, 264 



DP Directory, (P.O. Box 562, Bloom- 
field, CT 06002), monthly, 8V4 x 11 
inches, paperback. 

ISSN: 0730-6806 $48.00/year 

A collection of Table of Contents from 
DP magazines. Provides data process- 
ing managers, analysts and researchers 
with a tool to identify important ar- 
ticles. Over fifty magazines listed. 

JUCRO 




(for the Apple II* and the IBM-PC!) 
Here's the newest and freshest idea in dot-maze games. 
You'll go hog-wild at the way Pig Pen's clever switches 
make this the most intriguing game you ever got hooked on! 

With Pig Pen you run the maze leaving dots wherever 
you go! And the 4 beady eyed pigs are out to stop you. 
Take a potent, pulsing pig pill and you can zap the pigs, 
turning them into delicious ham hocks! Why bei 
'boared' with the old-fashioned versions. Get, 
the freshest — have the most fun of all! Oink, on 

$29.95 in Apple or IBM versions. At your 
computer store, or from: 



I DATAMOS1 



9748 Cozycroft Ave. 
Chatsworth, CA I 
(213)709-1202 ; 



VISA/MASTERCHARGE accepted. $1 .00 shipping/ 
handling charge. (California residents add 6% tax). 

"Apple is a trademark of Apple Computer, Inc. 
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You hover on the fringe, five parsecs 
from initialization of your mission. Your 
culture is tired and in need of new vitality. 
The Chamber can duplicate the essence of 
life from any species and you're about to 
start your "collection." What fate awaits 
you on this unique mission? Is it true that 
cultures opposed to your sampling have 
been preparing their defenses and stand 
ready to resist your intrusions? 

The first module is prepared for take off 
— diversions thru Envyrn™ presents 
Parsec™, a graphics space adventure 
unlike any you've ever played. Parsec™, 
created with the Envyrn™ graphics editor, 
simulates deep space in your TRS-80" 
computer, creating an action-filled field of 
play larger than any other microcomputer 
game. Parsec™ takes you beyond the 
screen and into worlds not yet seen by you 
or your computer. Join the adventure — 
subscribe to diversions thru Envyrn™ now 
or send $20 for Parsec™, the first of six 
modules to be released in 1982. Each 
module includes a magazine and a disk. 



liversions 



thru Erwrn 



6 South Street MiSford, NH 03055 



D One-year subscription (6 modules) 



$60.00 



Q Sample Envyrnment™ Parsec™ only — S20.00 
Name 



Address_ 



City/State 



-Zip_ 



□ Payment enclosed 

□ MasterCard D VISA 
Name of Cardholder 



Exp.Date^ 



MC#and lnterbank#/VISA#_ 
Signature 



To order use the card provided in this issue or send in this order blan 
I own a 48K TRS-80® with Disk □ Model I a Model 

TRS-80 is a registered trademark of Tandy Corporation 



COMPRESS - An Applesoft 

Optimizer 



by Barton M. Bauer s 



This machine-language utility 
will not only reduce Applesoft 
program memory requirements 
by up to 30% or more, but will 
increase execution and load 
speed also. 

COMPRESS 

requires: 

Apple II or Apple II Plus 
48K, Applesoft BASIC 

Note: While the listing for COMPRESS 
is longer than we normally publish, 
MICRO feels this valuable program 
should be available to our readers. 
However, if you prefer not to key it in, 
MICRO will supply the program on 
DOS 3.3 disk for $10.00, plus $2.00 for 
shipping and handling. See page 1 13 
for order information. 

Recently announced Applesoft com- 
pilers are advertised to be up to twenty 
times faster than the Applesoft inter- 
preter. Most reviewers have found, 
however, that in practice these com- 
pilers perform at about twice the 
operating speed of the interpreter. 
Recognizing that program compilation 
involves a significant amount of over- 
head, many programmers have avoided 
them or reserved them for specific ap- 
plications. Since compilers do not 
dramatically increase speed, and since 
some programs require that variables 
and arrays be dimensioned while the 
program is being executed (a feature 
most compilers don't support), the 
Applesoft interpreter is often the better 
compromise. 

COMPRESS is a machine-language 
program that will optimize most pro- 
grams in less than ten seconds. To en- 
sure clarity, COMPRESS allows the use 
of many REM statements in source pro- 
grams. Variables can be dimensioned 
within programs, and can appear in the 
program before they are dimensioned 
(another feature the compilers can't 



Listing 1: COMPRESS 



90OO 




1 


ORG 


*90OG 


9080 




2 


OBJ 


*800 


9000 


R9G0 


3 


LDR 


*t*0O 


9002 


8573 


4 


STR 


*73 


9604 


A9SD 


5 


LDR 


#*8D 


9006 


8574 


6 


STR 


*74 


9008 


4CD0O3 


7 


JMP 


*3D0 


900B 


R90O 


3 


LDR 


#*00 


9O0D 


RR 


9 


TAX 




900E 


A3 


10 


TRS' 




90OF 


18 


11 


CLC 




9010 


8506 


12 


STR 


*S6 


9012 


8508 


13 


STR 


*08 


9014 


8DD095 


14 


STR 


*95D0 


9017 


8DE095 


15 


STR 


*95E0 


901R 


85FB 


16 


STfi 


*FB 


901 C: 


R90S 


17 


LDR 


#*0S 


901E 


8507 


19 


STR 


*07 


9020 


R98C) 


19 


LDR 


#*SD 


9022 


8509 


20 


STR 


*09 


9024 


R907 


21 


LDR 


#*07 


9026 


951F 


22 


STR 


*1F 


9028 


R901 


23 


LDR 


#*G1 


902R 


85EF 


24 


STR 


*EF 


902C 


R900 


25 


LDR 


#*O0 


902E 


80E195 


26 


STR 


*95E1 


9031 


8DE295 


27 


STR 


*95E2 


9034 


8DE395 


2S 


STfl 


*95E3 


9037 


A903 


29 


LDR 


#*3 


9039 


S0E495 


30 


STfl 


*95E4 


903C 


R927 


31 


LDfl 


#*27 


903E 


8DE595 


32 


STfl 


*95E5 


9041 


R901 


33 


LDfl 


#*1 


9043 


SDD195 


34 


STfl 


*95D 1 


9046 


R90R 


35 


LDfl 


#*fl 


904S 


8DD295 


36 


STR 


*95D2 


904 B 


R964 


37 


LDfl 


#*64 


904D 


SDD395 


38 


STfl 


*95D'3 


9050 


R9ES 


39 


LDfl 


#*ES 


9052 


SDD495 


46 


STfi 


*95D4 


9055 


R910 


41 


LDfl 


#*10 


9057 


SDD595 


42 


STR 


*95D5 


905R 


R20O 


43 


LDX 


#*0O 


905C 


R9FF 


44 


LDR 


#*FF 


905E 




45 


PRG 




905E 


9D003D 


46 CLR1 STR 


*8D0O 


9061 


EOFF 


47 


CPX 


#*FF 


9063 


F604 


48 


BE CI 


CLR2 


9065 


ES 


49 


I NX 




9066 


4C5E90 


50 


JMP 


CLR1 


9869 


R260 


51 CLR2 LDX 


#*00 


906B 


9D008E 


52 CLf 


;3 STfi 


tSEOO 


906E 


EOFF 


53 


CPX 


#*FF 


9070 


F004 


54 


BECi 


CLR4 


9072 


E3 


55 


I NX 




9073 


4C6690 


56 


JMP 


CLR3 


9076 


R2G0 


57 CLR4 LDX 


##ee 


907S 


9DG0SF 


58 CLR5 STR 


■tSFOO 


907B 


EOFF 


59 


CPX 


#*FF 


907D 


FI33E 


60 


EEC' 


HOW 


907F 


E8 


61 


n*: 




908© 


4C7890 


62 


JMP 


CLR5 


9083 


C8 


63 INCV INV 




9084 


C:O0O 


64 


CPV 


#*ee 


9086 


DO0S 


65 


etc 


GOBAK 


9088 


86ED 


66 


iTX 


*ED 


903R 


R61F 


67 


LDX 


*1F 


90SC 


F60e 


68 


INC 


#00 , X 


90SE 


R6ED 


69 


LDX 


*El> 


9090 


60 


78 GOBRK RTS 




9091 


2CDDFB 


71 ERROR JSR 


*FBDD 


9094 


R9C5 


72 


LDR 


#*C5 


9096 


20F0FD 


73 


JSR 


*FDF£1 


9099 


R9D2 


74 


LDR 


#*D2 


909B 


20F0FD 


75 


JSR 


*FDFO 



SET HI MEM I'RLUE TO 
PROTECT COMPRESS 



RETURN TO R-'S 
INIT POINTERS AND 
REGISTERS USED 
BV COMPRESS 



PUT DEC-HEX CONUERSION 
CONSTANTS IN MEMORV 
TO PERMIT R.-S DECIMALIZED 
TOKENS TO BE CONUERTED 
TO HEX LINE NUMBERS 



START ROUTINE TO 
BLANK TABLES 



BLANK PAGE *8D 



BLANK PAGE *SE 



BLANK PAGE *SF 



SUBROUTINE TO INCREMENT 
V-REG AND CHECK TO 
SEE IF PAGE BOUNDARV 
CROSSED 



ERROR ROUTINE TO 
PRINT ERROR CODE 
# AND RETURN 
TO R'S ABORTING 
COMPRESS 



(Continued) 
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match). But actual control during ex- 
ecution must pass to those statement 
numbers after they are dimensioned. So 
COMPRESS does not interfere with any 
normal interpreter capabilities. 

Although COMPRESS can be 
thought of as a poor man's compiler, it 
is not a compiler at all. It merely 
reduces Applesoft programs to their 
minimum configuration. 

COMPRESS occupies 2.3 kilobytes 
of free RAM memory, just below DOS 
in a 48K Apple II Plus. It also uses 
about 30 bytes of zero-page storage for 
pointers. Typical programs can be re- 
duced 15% or more in memory require- 
ments, with up to 30% or more for cer- 
tain programs that contain a large 
number of REMs or other redundant 
code. But COMPRESS is not simply a 
REM remover. The programmer is en- 
couraged to insert a great deal of nar- 
rative in the original source program so 
that any modifications required later 
can be easily made to the source code 
and then recompressed. 

What COMPRESS Does 

COMPRESS removes line numbers, 
redundant statements, etc., and con- 
catenates as many Applesoft state- 
ments as can be legally assigned to one 
line number. For example, consider 
this program: 

10 LET J = 5 
20 LET K = 10 
30 END 

Although this simple program does 
nothing, it is a legal Applesoft program 
and could be run through COMPRESS. 
After running COMPRESS, the pro- 
gram would appear as: 

10 J = 5 : K = 10 : END 

COMPRESS has removed 45% of the 
memory requirements of this program! 

The original program would have 
appeared in memory as: 

00 0A 08 0A 00 AA 4A DO 

35 00 14 08 14 00 AA 4B 

DO 31 30 00 1A 08 IE 00 

80 00 00 00 



The compressed program 
memory would appear as: 



in 



00 


10 


08 


0A 


00 


4A 


DO 


35 


3A 


4B 


DO 


31 


30 


3A 


80 


00 


00 


00 















Note how many tokens are removed 
after the original program is cleaned up. 



Listing 1 (continued) 



969E 


2OF0FD 


76 




JSR 


SFDFO 




90R1 


H9CF 


77 




LOR 


#iCF 




93A3 


20F6FD 


78 




JSR 


*FDFS 




98R6 


(=1902 


79 




LDR 


»*D2 




98FHS 


20F0FD 


80 




JSR 


*FDF0 




90R6 


R9R6 


81 




LDR 


#*Re 




sent) 


20F0FD 


82 




JSR 


*FDF0 




90BG 


R9R3 


S3 




LDR 


**A3 




9862 


2OF0FD 


84 




JSR 


JFDFQ 




90B5 


R5F9 


85 




LDR 


»F9 




966? 


20DAFD 


86 




JSR 


JFDDR 




96BR 


4CD063 


87 




JMP 


*3DCi 




96BD 


B166 


88 


NOW 


LDfl 


C *86 J , V 


; PROGRAM STARTS HERE 


98bf 


20S39G 


89 




JSR 


INCV l GET R BYTE - INC V-REG 


98C2 


C90O 


90 




CMP 


**6£l 


; IS IT e? 


9BC4 


F03C 


91 




BEQ 


TSTR 


. YES - CHECK FOR END OF PROGRAM 


9ec.6 


C9C4 


92 




CMP 


#*C4 


: IS IT "THEN? 


90C8 


F013 


93 




BEQ 


THEN 


; VES 


98CR 


C9RB 


94 


NTHG 


CMP 


#*AB 


IS IT ■'GOTO'? 


98CC 




95 




PRG 






96CC 


F055 


96 




BEQ 


LORD 


; YES 


90CE 


C9B0 


97 




CMP 


**B0 


IS IT 'GOSUB'? 


90D0 


F051 


9S 




BEQ 


LORD 


: VES 


96D2 


C96C 


99 




CMP 


t»*BC 


: IS IT 'LIST'? 


9004 


F04D 


100 




BEO 


LORD 


: VES 


980 1". 


C9S5 


101 




CMP 


**85 


IS IT 'DEL'? 


90DS 


F049 


162 




BEQ 


LORD 


■ VES 


90DR 


4C6D9C1 


103 




J MP 


HOW 


: GO GET ANOTHER BYTE 


9ec>c 


85FD 


104 


THEN 


STR 


*FD 


PUT A-REG ASIDE 


90DF 


6106 


105 




LDR 


<*06:>< v 


GET ANOTHER BYTE 


90E1 


208396 


106 




JSR 


INCV 


INC V-REG 


90E4 


C9A6 


107 




CMP 


MAB 


IS IT 'GOTO'"' 


90E6 


FD3B 


163 




BEG 


LORD 


VES 


90ES 


33 


1Q9 




SEC- 




; FIND OUT IF THE TOKEN IS 


98E9 


E930 


lie 




SBC 


M38 


A LINE NUMBER REF. 


90EB 


3005 


ill 




BMI 


CLRIT 


NO, IT ISIN'T 


9GEt> 


3S 


112 




SEC 






90EE 


E90A 


113 




SBC 


**OR 




96FO 


3008 


114 




BMI 


GOT IT 


VES IT IS! 


90F2 


203893 


115 


CLRIT 


JSR 


DECS' 


BACK UP ONE 


90F5 


R5FD 


116 




LDR 


*FD 


GET A-REG BACK 


98F7 


4CBD90 


117 




JMP 


NOW 


FALSE ALARM 


90FR 


208893 


118 


GOT IT 


JSR 


DECV 


BACK UP ONE 


90FD 


A5FD 


119 




LDR 


*FD 


GET A-REG BACK 


9QFF 


4C2391 


120 




JMP 


LORD 


GO FORWARD 


9162 


61©6 


121 


TSTR 


LDR 


';*06:j,V 


GET ANOTHER BYTE 


9164 


20S390 


122 




JSR 


INCV 


INC V-REG 


9107 


C908 


123 




CMP 


#sm 


! IS THIS ALSO? 


9109 


F00C 


124 




BEQ 


PEND 


VES - 2 IN fl ROW 


9106 


208390 


125 




JSR 


INCV 


J NO. INC V-REG 


910E 


2SS390 


126 


NOTND 


JSR 


INCV 


: INC V R'EG AGAIN 


9111 


208396 


127 




JSR 


INCV 


: AND AGAIN 


9114 


4CBD96 


128 




JMP 


NOW 


CONTINUE ON 


9117 


B106 


129 


PEND 


LDfl 


<*06),V 


LOOK AT NEXT BYTE 


9119 


2BS390 


136 




JSR 


INCV 


; INC V-REG 


91 1C 


C960 


131 




CMP 


**00 


IS THIS THE THIRD 6? 


911E 


OeiEE 


132 




6NE 


NOTND 


: NO-THE PROGRAM IS NOT ENDED 


9120 


4C2292 


133 




JMP 


QEND 


VES - IT'S ALL OUER 


9123 


B106 


134 


LORD 


LDR 


•:*06;,V 


GET NEXT BYTE 


9125 


C900 


135 




CMP 


tt*00 


: IS IT G? 


9127 


F02E 


136 




BEQ 


NUMDUN 


VES THE STATEMENT IS ENDED 


9129 


208398 


137 




JSR 


INCV 


INC S'-REG 


912C 


C93R 


138 




CMP 


#*3fl 


: IS IT A 'COLON'? 


912E 


F027 


139 




BEQ 


NUMDUN 


VES THE STATEMENT IS ENDED 


9130 


C92C 


146 




CMP 


#*2C 


IS IT fl COMMA? 


9132 


F0OD 


141 




BEQ 


COMMA 


: VES 


9134 


R6EF 


142 




LDX 


*EF 


GET THE STATEMENT BUFFER OFFSET 


9136 


38 


143 




SEC 






9137 


E930 


144 




SBC 


tt*3u 


• DECMRLIZE THE TOKEN 


913? 




145 




PRG 






9139 


9DF095 


146 




STR 


J95F0..X 


: PUT IT ASIDE 


913C 


E6EF 


147 




INC 


*EF 


: ROD 1 


913E 


4C2391 


148 




JMP 


LORD 


GO GET ANOTHER BYTE 


9141 


C6EF 


149 


COMMA 


DEC 


*EF 


: COMMA MEANS LINE NUMBER ENDED 


9143 


206391 


150 




JSR 


CONU 


: GO CONUERT STMT # 


9146 


R901 


151 




LDfl 


tt*01 


; f;eihit 


914S 


85EF 


152 




STfl 


*EF 




914R 


B106 


153 




LDR 


<*&€■>, V 


GET ANOTHER BYTE 


91 4C: 


C900 


154 




CMP 


usee 


: IS IT 0? 


914E 


F01S 


155 




BEQ 


COMFIN 


: YES - LINE IS DONE 


9150 


C93R 


156 




CMP 


#*3fl 


: IS IT COLON? 


9152 


F0OC 


157 




BEQ 


COMF1 H 


: VES - LINE IS DONE 


9154 


4C2391 


158 




JMP 


LORD 


: NO - C0NT INUE ON 


9157 


C6EF 


159 


NLIMDUN 


DEC 


*EF 


ALL OF # IS FOUND 


9159 


206391 


160 




JSR 


CON'..' 


GO CONUERT STMT # 


91 5C 


A901 


161 




LDfl 


tttei 


; REINIT 


91 5E 


S5EF 


162 




STR 


*EF 




9160 


4CBD90 


163 


COMFIN 


JMP 


HOW 


BEGIN SEARCH OF NEXT LINE 


9163 


34FC 


164 


CON'..' 


STY 


*FC 


! PUT V-REG ASIDE 


9165 


R6EF 


165 




LDX 


*EF 


GET *95FB OFFSET 


9167 


S6FF 


166 




STX 


*FF 


SA'JE IT 


9169 


A90G 


167 




LDR 


tt*ee 




916B 


35FE 


168 




STR 


*FE 




91 6D 


35FR 


169 




STR 


IFR 




916F 


A6FF 


170 


GO 


LDX 


*FF 




9171 


BCF095 


171 




LDV 


J95F0..X 


; GET FIRST DEC DIGIT 


9174 


C6FF 


172 




DEC: 


*FF 


! DECREMENT OFFSET 


9176 


E6FE 


173 




INC 


*FE 


: INCREMENT COUNTER 


917S 


C0S0 


174 




CPV 


#*68 


; IS THE DEC t» 0? 



90 
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917ft 


F019 


175 




BEQ 


NEXT 


■ 


VES - GET NEXT 


917C 


f(6FE 


176 




LDX 


*FE 


■ 


NO - INC COUNTER 


917E 


BOD095 


177 




LDA 


*95D0,X 


; 


GET APPROPRIATE DEC/HEX CONSTANT 


9181 


88 


173 


CONTA 


DEY 




I 


COUNT DOWN 1 


9132 


C0O0 


179 




CPY 


#*00 


j 


IS V e? 


9184 


F0OF 


130 




BEQ 


NEXT 


• 


VES - GET NEXT 


9136 


18 


181 




CLC 




I 


NO - CONUERT 


9187 


700095 


182 




ADC 


*95D0,X 


I 


CONVERSION OF CONSTANT 


918H 


B003 


183 




BCS 


INCR 


I 


IF OVERFLOW BRANCH 


91 8C 


4C3191 


134 




JMP 


CONTR 




CONTINUE 


91 8F 


EEEG95 


135 


I NCR 


INC 


*95E0 


■ 


ROD 1 TO HEX MSB 


9192 


4C8191 


136 




JMP 


CONTR 


■ 


CONTINUE 


9195 


13 


137 


NEXT 


CLC 




• 


GET NEXT DIGIT 


9196 


6DD095 


183 




RDC 


*9500 






9199 


8DD095 


189 




STFl 


*95D0 




STORE RESULT 


919C 


8028 


190 




BCS 


INCS 


j 


IF OVERFLOW BRANCH 


91 9E 


H6EF 


191 


CONTC 


LDX 


*EF 


• 


GET COUNTER 


91R0 


ECF095 


192 




LDV 


*95F0,X 




GET NEXT CONSTANT 


91R3 


C6EF 


193 




DEC 


*EF 


• 


DECREMENT COUNTER 


9 ins 


E6FR 


194 




INC 


*FR 


\ 


INCREMENT POINTER 


91R7 




195 




PftG 








91 H7 


C000 


196 




CPV 


*I00 




IS V 0? 


91 R9 


FG34 


197 




BEQ 


OUT 




VES - QUIT 


9ine 


H6FH 


198 




LDX 


*Fft 




NO - GET POINTER 


9inC' 


BDE095 


199 




LOft 


*95E0,X 


2 


GET DEC -> HEX CONSTANT 


9160 


38 


208 


COHTB 


DEV 




• 


DECREMENT COUNTER 


9161 


cooo 


201 




CPV 


#*0Q 


. 


IS V 0? 


91 63 


FOl- 


202 




EEC! 


ROOM 


; 


VES - EXIT 


91 B5 


lS 


203 




CLC 






NO - CONUERT 


9166 


7DE095 


204 




HDC 


*95E0,X 






91 69 


B003 


205 




BCS 


INCR 


■ 


BRANCH IF OVERFLOW 


91 BE: 


4CB091 


206 




JMP 


coin b 


; 


CONTINUE 


91BE 


IS 


207 


INCH 


CLC 








91 BF 


R902 


203 




LOR 


#102 


; 


GET ERROR CODE 


91C1 


S5F9 


209 




STft 


IF 9 


; 


HEX > IFFFF 


91 C 3 


4C9190 


210 




JMP 


ERROR 


i 


GO PRINT ERROR MSG 


91C6 


EEE095 


211 


INCS 


INC 


I95E0 


• 


ADO tl TO MSB 


91C9 


4C9E91 


212 




JMF 1 


CONTC: 


* 


CONTINUE 


9 ICC 


IS 


^13 


ADDM 


CLC 








91 CD 


60E095 


214 




HDC 


J95E0 






9 IDG 


6006 


215 




BCS 


I NCB 


; 


BRANCH IF OVERFLOW 


91D2 


8DE095 


216 




STR 


*95E0 


I 


STORE RESULT 


91 05 


4CDF91 


217 




JMP 


OUT 


; 


CONTINUE 


91D3 


R901 


21S 


I NCB 


LDft 


#101 


• 


ERROR #1 


91DR 


85F9 


219 




STR 


*F9 






91DC 


4C9190 


220 




JW 


ERROR 


I 


GO PRINT ERROR MSG 


91 DF 


ftSFF 


221 


OUT 


LOft 


*FF 


; 


APE WE DONE? 


91E1 


C90U 


222 




CMP 


#*0G 






91E3 


FO05 


223 




BEQ 


WRITE 




VES - 


91E5 


R90O 


224 




LDft 


»*00 


1 


NO 


91E7 


4C6F91 


225 




JMF 1 


GO 


I 


GO ON 


91EH 


R909 


226 


WRITE 


LOR 


#*09 


\ 


SET UP POINTERS + OFFSETS 


91 EC 


351 F 


227 




STft 


*1F 






91EE 


H4FB 


228 




LDV 


*FB 






91 FG 


ADD095 


229 




LDft 


*95D0 


I 


GET LSB OF HEX LINEHUM 


91F3 


910S 


230 




STR 


<*es>,v 


; 


STORE HEX URLUE 


91F5 


263390 


231 




JSR 


INCV 


\ 


INCREMENT V 


91F3 


ftDE095 


232 




LDH 


*95E0 


I 


GET MSB OF HEX LINENUM 


91FB 


9103 


233 




STft 


<*03:>,V 


; 


INCREMENT V 


91 F0 


H509 


234 




LDH 


*09 


; 


LOOK AT MSB OF ADDRESS 


91FF 


C98E 


jio^i 




CMP 


#*8E 


; 


CHECK IF ROOM LEFT 


9201 


D00B 


236 




BNE 


OKNOU 


; 


VES 


9203 


C0FF 


237 




CPV 


#*FF 


• 


CHECK IF ROOM LEFT 


9205 


D007 


233 




BNE 


OKNOU 


; 


VES 


9207 


A903 


239 




LDH 


»*03 


; 


ERROR CODE 


9209 


85F9 


240 




STR 


*F9 






9206 


4C9190 


241 




JMP 


ERROR 


; 


GO PRINT ERROR MSG 


920E 


208390 


242 


OKNOU 


JSR 


INCV 


; 


RESET POINTERS 


9211 


84FB 


243 




STV 


*FB 






9213 


A907 


244 




LOft 


#*07 






9215 




245 




PRG 








9215 


S51F 


246 




STFl 


*1F 






9217 


A4FC 


247 




LDV 


*FC 






9219 


R900 


243 




LDR 


#*00 


; 


GET ZERO 


9216 


SDD095 


249 




STft 


*95D0 


; 


STORE IN LSB REGISTER 


921 E 


8DE095 


256 




STR 


*95E0 


; 


STORE IN MSB REGISTER 


9221 


60 


251 




RTS 




; 


RETURN 


9222 


84FC 


252 


GEND 


STV 


*FC 


; 


END OF THBLECRERTE 


9224 


R9C5 


253 




LDft 


#*C5 


; 


PRINT MESSAGE TO SCREEN 


9226 


20F0FD 


254 




JSR 


*FDF0 






9229 


R9CE 


255 




LDR 


#*CE 






922B 


20F0FD 


256 




JSR 


*FDF0 






922E 


H9C4 


257 




LDft 


#IC4 






9230 


20F0FD 


253 




JSR 


*FOFO 






9233 


R9H0 


259 




LOft 


#IftO 






9235 


2OF0FC' 


260 




JSR 


IFDFO 






923S 


H9CF 


261 




LOR 


#*CF 






923ft 


20FOFD 


26.2 




JSR 


*FOF0 






923D 


ft9C6 


263 




LOft 


#IC6 






923F 


20F0FO 


264 




JSR 


JFOFO 






9242 


A9ft0 


265 




LDft 


»*RG 






9244 


20F0FD 


266 




JSR 


*FDFO 






9247 


A9D0 


267 




LDR 


#*D0 






9249 


20F0FD 


26S 




JSR 


*FDF0 






924C 


H9C1 


269 




LDH 


#*C1 






924 E 


20F0FD 


270 




JSR 


*FOFO 






9251 


H9D3 


271 




LOR 


#*03 






9253 


20F0FD 


272 




JSR 


*FOFO 






9256 


20F0FD 


273 




JSR 


*FDFO 







(Continued) 



This example illustrates the basic ac- 
tion of the program COMPRESS. 



Why COMPRESS Works 

Applesoft programs are models of 
efficiency. There is no extraneous 
space or character storage in memory. 
Each command, character, or number 
is represented within the computer by a 
token. The token for the command 
PRINT is "BA", a hexadecimal number 
equivalent to the decimal value 186. 
There are 234 different tokens that 
Applesoft can recognize, represented by 
hexadecimal numbers $00 through 
$EA. (Following the normal conven- 
tion, we will refer to all hexadecimal 
numbers with a prefix of '$' so they can 
be distinguished from normal decimal 
numbers.) 

Continuing with the example 
PRINT ($BA), use of the token allows 
storage of the command PRINT in just 
one byte, rather than spread out over 
five. In effect, a great deal of optimizing 
has already been done in the design of 
the Apple! 

Other computers carry blanks into 
the program memory, but the Apple 
only does this with strings, where each 
blank is significant. The token repre- 
sentation for the words "CUSTOMER 
NAME" would be: 

43 55 53 54 4F 4D 45 52 20 4E 41 4D 45 

In this case, since the programmer 
desires the string typed out exactly as 
entered, no changes would be acceptable 
within it, and Applesoft makes none. 

Despite the fact that the Applesoft 
programs are already condensed in 
memory, additional optimizing is pos- 
sible. Between each line in memory, 
for example, the computer stores the 
value $00. This null character, called a 
delimiter, tells the Applesoft inter- 
preter that the previous line has ended. 
After $00, two bytes indicate the ad- 
dress in memory of the statement 
following the next statement. These 
bytes ($0A $08 in the example at the 
beginning) are stored in low-byte/ 
high-byte format. The actual address in 
this example is therefore $080A. 

The line number is stored in two 
bytes, again with the least significant 
byte first. Ever wonder why the largest 
line number which can be used in 
Applesoft is 63999? One reason is that 
two bytes can describe a maximum of 
$FFFF integers — the equivalent of 
decimal 65535. 
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Each Applesoft statement, then, re- 
quires five bytes — a null byte, two ad- 
dress bytes, and two line-number bytes. 

As noted in the Applesoft manual, it 
is possible to put two or more state- 
ments together by separating each with 
a colon (:)■ If two statements are thus 
joined, only one byte is used ($3A, the 
token for the colon). Separate lines 
would require four additional bytes. 
Applesoft imposes only the limitation 
that no line can have more than 255 
characters. 

Applesoft BASIC contains other op- 
portunities for optimization. For exam- 
ple, COMPRESS eliminates the un- 
necessary LET, thus saving one byte. 
And COMPRESS will delete any vari- 
able name after NEXT. This could save 
many bytes per line. REM statements 
can also be dropped, unless of course 
some branching statement jumps to a 
line number that happens to be a REM 
statement (a bad programming habit]. 

Even though Applesoft is a very effi- 
cient language, there is ample oppor- 
tunity for further reduction in memory 
use when storing programs. 

How COMPRESS Works 

The first step in compressing a pro- 
gram is to look for called line numbers. 
COMPRESS will eliminate lines by ap- 
pending them to earlier lines. But it is 
important to preserve lines that are 
referred to elsewhere in the program 
with commands such as GOTO, 
GOSUB, etc., to permit proper transfer 
of control. Therefore, the first action 
COMPRESS takes is the creation of a 
Called Line Number Table. 

The following Applesoft commands 
refer control to another line number: 

IF ... GOTO 

GOTO 

GOSUB 

LIST 

ON ... GOTO 

DEL 

COMPRESS searches the program 
for these commands. Line numbers 
that are identified in these statements 
are stored in a Called Line Number 
Table at memory locations $8D00 to 
$8EFF. When compression takes place, 
this table is checked so no line number 
that appears in the table as a called line 
number will be eliminated. 

The table will contain all of the called 
line numbers in the order in which they 
appeared in the original program. 



Listing 1 



9259 


R9R0 


274 




LDR 


MRS 




9256 


26F0FD 


275 




JSR 


SFDF0 




925E 


ft9ft3 


276 




LDR 


#*ft3 




9260 


20F0FD 


277 




JSR 


*FDF0 




9263 


R961 


27S 




LDR 


M61 




9265 


20F0FD 


279 




JSR 


IFDF0 




9263 


203BFD 


230 




JSR 


*FDSB 




926E 


R900 


281 


PGMWRT 


LDR 


»*00 


; INITIALIZE UftLUES FOR 


926D 


A3 


282 




TRV 




; POINTERS RND OFFSETS 


926E 


8506 


283 




ST ft 


X06 


1 FOR COMPRESSION 


9270 


85FF 


284 




STft 


*FF 


; PORTION OF PROGRAM 


9272 


S5EB 


285 




STft 


*EB 




9274 


S5EF 


286 




STR 


*EF 




9276 


S5D6 


287 




STft 


*D6 




927S 


35CE 


288 




STft 


*CE 




927H 


3508 


289 




STft 


£08 




927C 


8DFE8F 


290 




STft 


*8FFE 




927F 


R93R 


291 




LDR 


#*3ft 




92S1 


8DFF8F 


292 




STft 


*2FFF 




9284 


ft90S 


293 




LDR 


*S03 




9286 


8507 


294 




STfl 


*67 




9283 




295 




PRG 






923S 


85EC 


296 




STft 


»EC 




9281=1 


R907 


297 




LDA 


11*07 




928C 


851F 


298 




STft 


*1F 




928E 


R98F 


299 




LDR 


t)*8F 




9296 


85CF 


300 




STR 


*CF 




9292 


R903 


301 




LDR 


#*03 




9294 


85FA 


302 




STft 


»FR 




9296 


B106 


303 


CMPPB 


LDR 


<*06)-V 


1 READ BVTE OF IVS PROG 


9298 


208390 


304 




JSR 


1NCV 




9296 


C900 


305 




cup 


#*00 


; is it 0? 


9290 


F003 


306 




BEQ 


TSTS 


; VES - TEST IT 


929F 


4C9E93 


307 




JMP 


PROG 


i NO - WRITE IT 


92fl2 


A6FR 


30S 


TSTS 


LDX 


*FR 




92R4 


E003 


309 




CPX 


»*03 


; DID COMPRESS JUST STRRT? 


92R6 


D00C 


310 




BNE 


TSTV 


; NO 


92R8 


8419 


311 




STV 


*19 


; VES - STORE LOCRTION OF 


92I=lfl 


R4EC 


312 




LDV 


*EC 


; fl'S ADDRESS REFERENCE 


92FIC 


841FI 


313 




STV 


MR 


1 IN COMPRESSED STRTEMENT 


92AE 


R419 


314 




LDV 


*19 




9160 


A20B 


315 




LDX 


*»0C 


i RESET INDICATOR 


92B2 


86Ffi 


316 




STX 


*Ffl 




92B4 


S41B 


317 


TSTV 


STV 


»16 




92B6 


C61B 


318 




DEC 


SIB 




92B8 


6106 


319 




LDR 


<*86>,V 


; GET ANOTHER BVTE 


92BR 


208390 


320 




JSR 


INCV 




92BD 


C900 


321 




CMP 


**00 


; IS IT ALSO? 


92BF 


D003 


322 




BNE 


GOON 


; NO - GO ON 


92C1 


4C9293 


323 




JMP 


REND 


1 VES - CHECK FOR END 


92C4 


208390 


324 


GOON 


JSR 


INCV 




92C7 


B106 


325 




LDR 


<*06)..V 


I GET RNOTHER BVTE 


92C9 


208390 


326 




JSR 


INCV 




92CC 


R6FF 


327 




LDX 


*FF 




92CE 


E000 


328 




CPX 


t)*08 


1 IS THIS NEW LINE? 


92D0 


F003 


329 




BEQ 


STRR 


; VES GO STORE 


92D2 


4CD792 


336 




JMP 


NSTR 


; no 


92D5 


83 ID 


331 


STRR 


STR 


»1D 


; SflUE LINE NUMBER 


9207 


84FD 


332 


NSTR 


STV 


*FD 


: PUT RSIDE POINTERS 


92D9 


B08D 


333 




LDV 


#*SD 


1 TO CHECK CALLED LINE 


92DB 


84D7 


334 




STV 


#D7 


; NUMBER TABLE! 


92DD 


R2D7 


335 




LDX 


tt*D7 




92DF 


861F 


336 




STX 


*1F 




92E1 


R000 


337 




LDV 


#*00 




92E3 


C4FB 


338 


RNSTR 


CPV 


*FB 


1 RRE WE DONE CHECKING? 


92E5 


F011 


339 




BEQ 


ENDTST 


; ves 


92E7 


D1D6 


340 


NOMRT 


CMP 


<#D6),V 


; LOOK FOR LSB OF LINE * 


92E9 


F030 


341 




BEQ 


STRB 


1 FOUND IT! 


92EB 


208390 


342 




JSR 


INCV 




92EE 


C4FE 


343 




CPV 


*FB 


; ARE WE DONE? 


92F0 


F606 


344 




BEQ 


ENDTST 


1 VES 


92F2 




345 




PRG 






92F2 


208390 


346 




JSR 


INCV 




32F5 


4CE392 


347 




JMP 


FINSTR 


1 NO - CONTINUE CHECKING 


92F8 


A609 


348 


ENDTST 


LDX 


*09 




92FR 


E4D7 


34.9 




CPX 


*D7 


; CHECK LIMITS OF CALLED 


92FC 


D0E9 


350 




BNE 


NOMRT 


; LINE « TRBLE 


92FE 


A4FD 


351 




LDV 


*FD 




9MB 


ft207 


352 




LDX 


#*07 




9302 


861F 


353 




STX 


*1F 




9304 


B106 


354 




LDR 


<*06),V 


1 GET ANOTHER ft/S BVTE 


9306 


208390 


355 




JSR 


INCV 




9369 


R6FF 


356 




LDX 


*FF 




930B 


E000 


357 




CPX 


t»*00 


; IS INDICATOR CLEAR? 


930D 


F003 


358 




BEQ 


STRE 


; VES 


930F 


4C9692 


359 




JMP 


CMPPB 


; NO - GET R BVTE 


9312 


85 IE 


360 


STRE 


STR 


*1E 


; STORE MSB OF LINE # 


9314 


R984 


361 




LDR 


#*04 


1 CHRNGE POINTER 


9316 


85FR 


362 




STfl 


*Ffi 




931S 


4C9692 


363 




JMP 


CMPPB 


; GO GET NEXT BVTE 


931B 


208390 


364 


STRB 


JSR 


INCV 




931E 


84FE 


365 




STV 


*FE 


1 SET UP POINTERS FOR 


9326 


R4FD 


366 




LDV 


*FD 


; ADDITIONAL CHECKING OF 


9322 


R207 


367 




LDX 


**07 


; MSB OF LINE NUMBER 


9324 


S61F 


36S 




STX 


»1F 




9326 


S51C 


369 




STfl 


*1C 




9328 


B106 


370 




LDR 


C*06),V 


1 GET R BVTE OF fl-'S 


932ft 


208390 


371 




JSR 


INCV 




932D 


A6FF 


372 




LDX 


*FF 
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932F Eeee 


373 




CPX 


•*ee 


i 


IS INDICATOR CLEAR? 


9331 F0Q3 


374 




BEG 


STRF 


I 


VES - 


9333 4C3S93 


375 




JMP 


CNTXX 


I 


NO 


9336 85 IE 


376 


STftF 


STFl 


*1E 


i 


PUT MSB RWAV 


933S S4FD 


377 


CNTXX 


STY 


*FD 


! 


STRRT LOOKING FOR 


933A R2D7 


378 




LDX 


#*D7 


; 


fl MATCH OF THE MSB 


933C 86 IF 


379 




STX 


»1F 


1 


OF THE LINE NUMBER 


933E R4FE 


380 




LDV 


*FE 






9340 D1D6 


381 




OIF' 


<*D65,V 






9342 FG1B 


382 




BEQ 


SET 






9344 268390 


333 




JSR 


INCV 






934? S4E0 


384 




STV 


*ED 






9349 Ree? 


3S5 




LDV 


**07 






934B S41F 


386 




STV 


*1F 






9340 A4FP 


387 




LDV 


*FD 






934F 2G8S93 


388 




JSR 


DECV 






9352 S4FD 


389 




STV 


*F0 






9354 R0D7 


390 




LDV 


**D? 






9356 84 IF 


391 




STV 


*1F 






9358 H4ED 


392 




LDY 


*ED 






935H A51C 


393 




LDA 


• 1C 






935C 4CE392 


394 




JMP 


ANSTR 






935F, 


395 




PAG 








935F A4FD 


396 


SET 


LDV 


*F0 


1 


RETURN WITH fi MATCH 


9361 R287 


397 




LOX 


•*87 






9363 861 F 


398 




STX 


*1F 






9365 A285 


399 




LOX 


tt*05 






9367 S6FA 


480 




STX 


*Ffl 


I 


RESET FLAG 


9369 A6FF 


481 




LOX 


*FF 


1 


IS THIS fl NEW LINE? 


936B Eeee 


482 




CPX 


»*ee 






9360 0803 


483 




BNE 


GCIGO 


• 


NO 


936F 4C9692 


404 




JMP 


CMPP6 


J 


VES - GET ANOTHER BVTE 


9372 A901 


485 


GOGO 


LDA 


«*et 


1 


RESET FLAG 


9374 S5FA 


486 




STA 


»Ffi 






9376 288893 


487 




JSR 


OECV 


1 


BACK UP POINTER 


9379 208893 


488 




JSR 


DECV 






937C 288893 


489 




JSR 


DECV 






937F 28SS93 


410 




JSR 


DECV 






9382 288893 


411 




JSR 


OECV 






9385 4CD894 


412 




JMP 


CERTR 


1 


MATCH MADE - GO WRITE LINE 


9383 88 


413 


oecv 


DEV 




1 


SUBROUTINE TO DECREMENT 


9389 C8FF 


414 




CF'V 


»*FF 


1 


V REG RND CHECK IF PAGE 


9388 0804 


415 




BNE 


RETNN 


J 


BOUNDRRV IS CROSSED 


938D A61F 


416 




LOX 


*1F 






938F 060© 


417 




OEC 


*88,X 






9391 68 


418 


RETNN 


RTS 








9392 8106 


419 


RENO 


lor 


<*86>..V 


1 


GET ANOTHER BVTE 


9394 C900 


420 




CMP 


**ee 


1 


IS THIS ONE ALSO? 


9396 D803 


421 




BNE 


GONO 


1 


NO - IT IS NOT THE END 


9398 4C6395 


422 




JMP 


FEND 


1 


VES - PROGRAM ENDED 


939B 4CC492 


423 


GONO 


JMP 


GOON 


J 


GO ON 


939E 8DFESF 


424 


PROG 


STR 


*8FFE 


t 


CHECK TO SEE IF WE 


93A1 C93A 


425 




CMP 


»*3R 


t 


HAUE fl COLON 


93R3 FOOD 


426 




BEQ 


FLAG 


I 


VES 


9385 A0FF8F 


427 




LOR 


*8FFF 


I 


NO-CHECK THIS ADDRESS 


93R8 C93H 


428 




CMP 


«<3R 






93AA F82C 


429 




BEQ 


CLRFLG 






93FC RDFE8F 


438 




LDR 


*8FFE 






93RF 4CE893 


431 




JMP 


ONWARD 






93B2 RDFFSF 


432 


FLAG 


LOR 


*SFFF 


t 


CHECK TO SEE 


9385 C93R 


433 




CMP 


»*3fi 


I 


IF WE HflUE ft COLON 


938? 0800 


434 




BNE 


SETS 


J 


NO 


93B9 8186 


435 




LOR 


<*86)A' 


I 


VES GET ANOTHER BVTE 


9388 C9Q0 


436 




CMP 


#*ee 


I 


IS IT 8? 


93BD F883 


43? 




BEQ 


RNGFIX 


; 


VES 


93BF 4C9692 


438 




JMP 


CMPPB 


1 


NO GO CONTINUE 


93C2 CA 


439 


RNGFIX 


DEX 




I 


BACK UP ONE 


93C3 4C9494 


440 




JMP 


CNTRX 






93C6 B186 


441 


SETZ 


LOR 


<*06>,V 


; 


GET NEXT BVTE 


93C8 C988 


442 




CMP 


»*ee 


1 


IS IT 0? 


93CA D08T 


443 




BNE 


SET21 


; 


NO 


93CC 4C9494 


444 




JMP 


CNTRX 


S 


VES 


93CF. 


445 




PAG 








93CF RDFE3F 


446 


SET21 


LOR 


*SFFE 


t 


SET FLAG 


9302 8DFF6F 


44? 




STA 


*8FFF 






9SD5 4CF893 


44S 




JMP 


PROGWT 


: 


WRITE COMPRESSED CODE 


9308 nseo 


449 


CLRFLG 


LOR 


•*88 






93DR 80FF8F 


450 




STR 


»8FFF 






9300 FOFE8F 


451 




LOR 


*SFFE 






93E0 C9R6 


452 


ONWARD 


CMP 


•#R6 




IS IT 'GOTO'? 


93E2 FQ39 


453 




BEQ 


GOTO 




VES 


93E4 C9A0 


454 




CMP 


**fll> 




IS IT 'IF'? 


93E6 F0S8 


455 




BEQ 


IF 




VES 


93ES C9B1 


456 




CMP 


»*81 




IS IT 'RETURN'? 


93EA F84C 


45? 




BEQ 


IF 




VES 


93EC C982 


45S 




CMP 


t*S2 




IS IT 'NEXT'? 


93EE F053 


459 




BEQ 


NXTT 




VES 


93F0 C9AA 


460 




CMP 


«*RR 




IS IT 'LET'? 


93F2 F066 


461 




BEQ 


LET 




VES 


93F4 C9B2 


462 




CMP 


•*B2 




IS IT 'REM'? 


93F6 F06A 


463 




BEQ 


REM 




S'ES 


93FS 9D0OSF 


464 


PROGWT 


STR 


*8F0O,X 




STORE THE BVTE - NOT R TERM CMD 


93FB 861C 


465 




STX 


*1C 




PUT X ASIDE 


93FD A6FA 


466 




LOX 


*FR 




GET FLAG 


93FF E006 


467 




CPX 


M06 




IS IT 6? 


9481 F80S 


46S 




BEQ 


ELIM 




VES 


9403 A61C 


469 




LOX 


*1C 




GET X BACK 


9485 4C9594 


4?0 




JMP 


CNTRR 




CONTINUE 


9488 R201 


4?1 


ELIM 


LDX 


**01 




SUBROUTINE TO ELIMINATE 

(Continued) 



Consider the following program: 

10 GOTO 50 
50 END 

A simple concatenation would be: 

10 GOTO 50 : END 

Any attempt to run the shortened 
program would result in an Applesoft 
error. Consider a slight modification of 
this example: 

10 GOTO 50 
20 J = 5 
50 END 

By appending the program together into 
one statement, it would appear as: 

10 GOTO 50 : J = 5 : END 

Again there would be an Applesoft 
error. Note that the first part of the 
statement (GOTO 50) immediately 
transfers control to a later line number. 

Assume for a moment that a called 
line number table has been con- 
structed, and the 'GOTO 50' statement 
identified. Recognizing that line 50 
could not be eliminated, COMPRESS 
would preserve it. After compression 
the program would look like this: 

10 GOTO 50: J = 5 
50 END 

While the execution of this short 
program would not create a computer 
error, the transfer of control to line 50 
takes place before the 'J = 5' is ex- 
ecuted. So 'J = 5' would never be ex- 
ecuted at all. 

Another condition that the com- 
pression program must address is Ter- 
minal Commands. Commands that not 
only transfer control, but do it ir- 
revocably (as shown in the example 
above), are called Unconditional Ter- 
minal Commands. Commands that 
may or may not transfer control are 
called Conditional Terminal Com- 
mands. Unconditional Terminal Com- 
mands include: 

GOTO 

ON ... GOTO 

RETURN 

REM (see the discussion later 

in the article on REM) 

Conditional Terminal Commands 
include: 

IF ... GOTO 

IF ... THEN GOTO 

IF ... THEN ... 
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Conditional commands behave in a 
special way. For example: 

10 IF A = 2 THEN B = 5 
20 C = 6 

Executed without compression, the 
'C = 6' assignment will be executed 
regardless of the outcome of statement 
10. If these lines are concatenated, they 
appear as: 

10 IF A = 2 THEN B = 5 :C= 6 

Applesoft will evaluate the 'IF A = T 
part of the line. If it is false, then no fur- 
ther action will take place on that line; 
control will immediately fall through 
to the next line. Conditional Terminal 
Commands are different from Un- 
conditional Terminal Commands be- 
cause control is transferred immedi- 
ately only if the condition in the state- 
ment is false. Nevertheless, COM- 
PRESS cannot append any subsequent 
statements to terminal commands of 
any type, because doing so may subvert 
the programmer's intent. 

It is legal, however, for the program- 
mer to concatenate many statements 
after a conditional command. This is a 
method of saving space and speeding up 
execution time, but it can only be done 
by the programmer. COMPRESS can- 
not possibly know the initial intent. A 
Conditional Terminal Command then, 
is one where control may or may not be 
passed to the next statement, or to 
some numbered statement earlier or 
later in the program. 

COMPRESS takes two actions with 
respect to conditional commands. 
First, any referenced line number is 
recorded in a Called Line Number 
Table so that the line number will not 
be eliminated. Second, as with any ter- 
minal command, there will be nothing 
appended to the Conditional Terminal 
Command, unless the programmer ad- 
ded something in the initial program. 
COMPRESS always appends the last 
statement to the line. Unconditional 
Terminal Commands will be treated in 
exactly the same manner. 

REM Statements 

Applesoft treats REM in a special 
way. When a REM token [$B2) is en- 
countered in a program, everything 
after the REM is considered part of the 
remark until the $00 delimiter is en- 
countered. The statement 

10 REM THIS IS A REMARK : J = 10 

would not be evaluated past the first 



Listing 1 (continued) 



940ft 86FA 


472 




STX »Ffi 




EUERVTHING AFTER "REr 


940C R61C 


473 




LDX *1C 






948E 4C1494 


474 




JMP ELIM3 






Mil 208398 


475 


ELIM2 


JSR INCV 






9414 B186 


476 


EL I (13 


LDfl <*06>,V 


; 


GET ANOTHER BVTE 


9416 csee 


477 




CMP »*80 


; 


IS IT 0? 


9418 MF7 


478 




BNE ELIM2 


j 


NO - LOOP 


941R 4C9394 


479 




JMP CNTRR 


; 


VES - REM IS DONE 


941D 85ED 


488 


GOTO 


STR *ED 


I 


PUT BVTE ASIDE 


941F E008 


481 




CPX #*00 


• 


IS X 0? 


9421 F8QC 


482 




BEG THRU 


• 


VES 


9423 cn 


483 




DEX 


\ 


NO - BACK UP 


9424 BD888F 


484 




LDA *8F80,X 


; 


GET LAST BVTE 


942? C9C4 


485 




CMP »«C4 


I 


UflS IT 'THEN'? 


9429 6*83 


486 




BNE INCC 




NO 


9428 4C2F94 


487 




JMP THRU 


i 


VES 


942E E8 


4SS 


INCC 


INX 


■ 


RESET X AGAIN 


942F (*901 


489 


THRU 


LOR #*81 


i 


RESET FLAG 


9431 85FA 


498 




STfi *FA 






9433 RSED 


491 




LDA *ED 


• 


GET flCC BACK 


9435 4CF893 


492 




JMP PROGUT 


I 


GO WRITE BVTE 


9438 85ED 


493 


IF 


STfl *ED 


• 


PUT BVTE ASIDE 


943ft A931 


494 




LDA t*01 


• 


RESET FLAG 


94 3C 


495 




PFlG 






943C 85FR 


496 




STfl *FA 






943E A5E[> 


497 




LDFl *ED 


1 


GET BVTE BACK 


9448 4CF693 


498 




JMP PROGUIT 


I 


GO URITE BVTE 


9443 85ED 


499 


NXTT 


STfl *ED 


\ 


PUT BVTE ASIDE 


944S B106 


580 


NXTX 


LDA (*86J,V 


; 


GET NEXT FI.-S BVTE 


944? C93fl 


581 




CMF' #*3A 


I 


IS IT COLON? 


9449 F00A 


582 




BEO LOADM 


\ 


VES - NO UflR NAME 


944B C900 


583 




cmp #*ee 


; 


IS IT END OF STMT? 


9440 F886 


504 




BEQ LOflDM 


; 


VES - NO UAR NAME 


944F 208398 


505 




JSR INCV 






9452 4C4594 


586 




JMP NXTX 


i 


GO GET ANOTHER 


9455 A5ED 


50? 


LOAOM 


LDFl »ED 


; 


GET BVTE BACK 


9457 4CF893 


503 




JMP PROGUIT 


■ 


GO URITE BVTE 


945FI 8186 


509 


LET 


LDfl '.«&&>,••/ 


i 


GET NEXT fl-'S BVTE 


945C 288398 


518 




JSR INCV 






945F 4CF893 


511 




JMP PROGUT 


; 


GO URITE IT 


9462 Eaee 


512 


REM 


CPX #*B8 


; 


IS THIS NEW LINE? 


9464 F081 


513 




BEQ REMFl 


; 


VES 


9466 CA 


514 




DEX 


; 


NO - BACK UP 


946? 861C 


515 


REMA 


STX *1C 


; 


PUT X ASIDE 


9469 A6FA 


516 




LDX *FA 


i 


LOOK AT FLAG 


946B E885 


517 




CPX tt*05 






946t> D88E 


518 




BNE REMC: 






946F A206 


519 




LDX #*8S 


; 


RESET FLAG 


9471 86FA 


528 




STX *FA 






9473 H61C 


521 




LDX tlC 


; 


GET X BACK 


9475 E060 


522 




CPX #*00 


I 


IS IT A NEW LINE? 


9477 F801 


523 




BEQ REMB 


; 


VES 


9479 E8 


524 




I NX 


; 


NO - AD'JANCE 1 


947A 4CF893 


525 


REMB 


JMP PROGUT 


I 


GO URITE BVTE 


947D A61C 


526 


REMC 


LDX *1C 


I 


GET X BACK 


947F B106 


527 




LDfl <*86> J V 


i 


GET ANOTHER A.-S BVTE 


9481 C980 


526 




CMP »*80 


\ 


IS IT 0? 


9483 F886 


529 




BEQ CNTSB 


; 


VES GO SEE IF END 


9485 203398 


538 




JSR INCV 


; 


ADVANCE POINTER 


9488 4C7D94 


531 




JMP REMC 


j 


CONTINUE 


948B E000 


532 


CNTSB 


CPX #*00 


; 


IS THIS A NEW LINE? 


948D 0805 


533 




BNE CNTAX 


; 


NO 


948F 86FA 


534 




STX *FA 


J 


RESET FLAG 


9491 4C9692 


535 




JMP CMPPB 


; 


GO GET ANOTHER BVTE 


9494 cn 


536 


CNTAX 


DEX 


; 


BACK UP X REG 


9495 B106 


537 


CNTAA 


LDfl <*06) J V 


I 


GET ANOTHER A.-S BVTE 


9497 E0EE 


533 




CPX #*EE 


; 


ARE UE OUT OF ROOM? 


9499 F08B 


539 




BEQ BACKUP 


; 


S-ES - BACKUP 


949B E8 


540 




INX 






949C C900 


541 




CMP »*0G 


; 


IS BVTE e? 


949E F816 


542 




8EQ ENDEM 


; 


VES - GO END 


94A8 208398 


543 




JSR INCV 






94R3 4C9E93 


544 




JMP PROG 


I 


CONTINUE 


94 R6 


545 




PAG 






94A6 288893 


546 


BACKUP JSR DECS' 


• 


BACK UP V F;EG 


94 A9 C41B 


547 




CPV *1B 






94 AB D8F9 


548 




BNE BACKUP 


; 


CONTINUE 


94HD S4FC 


549 




STV *FC 


; 


SET V ASIDE 


94AF R201 


550 




LDX tt*01 


; 


RESET FLAG 


94B1 S6FA 


551 




STX *FA 






94B3 4CDS94 


552 




JMP CERTA 






9486 EQEE 


553 


ENDEM 


CPX **EE 


; 


ARE UE OUT OF ROOM? 


94BS F0EC 


554 




BEQ BACKUP 


; 


VES 


94BA A93A 


555 




LDfl **3A 


; 


GET COLON 


94BC 9D088F 


556 




STfl *8F0E1,X 


; 


URITE COLON 


94BF SDFF3F 


557 




STfl *8FFF 


i 


STORE IN FLAG 


94C2 86EE 


55o 




STX *EE 


; 


SET X ASIDE 


94C4 E3 


559 




INX 






94C5 S6FF 


560 




STX *FF 






94C7 H6FR 


561 




LDX *FA 


• 


GET FLAG 


94C9 E805 


562 




CPX #*85 






94CB D004 


563 




BNE END2 


; 


TIME TO END' 1 


94CD 8280 


564 




LDX #*00 


j 


RESET FLAG 


94CF S6FA 


565 




STX *FA 






94D1 E001 


566 


END2 


CPX #*01 


; 


IS FLAG 1? 


94D3 F803 


567 




BEQ CERTA 


; 


VES GO URITE LINE 


94D5 4C9692 


56S 




JMP CMPPB 


I 


NO CONTINUE 


94D8 A6EE 


569 


CER'TA 


LDX *EE 


I 


GET X BACK 


94DA 36FF 


578 




STX *FF 


; 


OVERWRITE POINTER 


94DC E808 


571 




CPX #*00 


; 


IS X 0? 



94 
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94DE 


DG09 


572 




BNE 


WRTLN 


; 


NO 


94E0 


R5FFI 


573 




LDfl 


*FR 


J 


GET FLRG 


94E2 


C902 


574 




CMP 


#*02 






94E4 


D003 


575 




BNE 


WRTLN 


; 


GO WRITE LINE 


94E6 


4C7195 


576 




JMP 


F1NRL 


; 


GO END PROGRAM 


94E9 


84FC 


577 


WRTLN 


STV 


*FC 


■ 


SET V ASIDE 


94EB 


R4EF 


578 




LDV 


*EF 






94ED 


A9EC 


579 




LDR 


»*EC 






94EF 


851 F 


580 




STR 


*1F 






94F1 


R200 


581 




LDX 


#*ee 






94F3 


8R 


532 




TXft 








94F4 


91EB 


583 




STR 


<*EBJ,V 


j 


WRITE COMP ft-'S PROG 


94F6 


20S390 


564 




JSR 


INCV 






94F9 


20S390 


585 




JSR 


INCV 






94FC 


203390 


5S6 




JSR 


INCV 






94FF 


A51D 


587 




LDR 


*1D 


■ 


GET LINE NO 


9501 


91 EB 


588 




STR 


<*EB5. V 


i 


STORE IT 


9563 


208390 


589 




JSR 


INCV 


; 


GET MSB OF LINE 


9506 


R51E 


590 




LDR 


*1E 


* 


RND STORE IT ALSO 


9503 


91 EB 


591 




STR 


■C*EB>, V 






950ft 


208390 


592 




JSR 


INCV 






9500 


BOB0SF 


593 


GONOW 


LDR 


*8F00,X 


I 


START LOADING COMPRESSED 


9516 


91EB 


594 




STR 


■:*eb:>,v 


• 


LINE AMD STORING IT 


9512 




595 




PRG 








9512 


E4FF 


596 




CPX 


*FF 




IN LOMEM 


9514 


F907 


597 




BEQ 


BftKNOW 






9516 


208390 


598 




JSR 


INCV 






9519 


ES 


599 




I NX 








951R 


4CBD95 


600 




JMP 


GONOU 




CONTINUE 


95 U) 


A900 


601, 


BftKNOW 


LDR 


#*00 


; 


WRITE A *00 DELIMITER IN 


951F 


91EB 


602 




STR 


■;*EB .:■,'.' 


I 


THE PROGRAM TO END LINE 


9521 


S4EF 


603 




STV 


*EF 






9523 


208390 


604 




JSR 


INCV 






9526 


93 


605 




TVA 








9527 


R01R 


606 




LDV 


#*lfl 






9529 


S41F 


607 




STV 


*1F 






952B 


A000 


60S 




LDV 


#*00 






952D 


9119 


609 




STR 


<*19:>,V 




BLANK ADDRESS 


952F 


S5FD 


610 




STR 


*FD 






9531 


208390 


611 




JSR 


INCV 






9534 


R5EC 


612 




LDR 


SEC 






9536 


9119 


613 




STR 


':*i9:),v 


• 


WRITE ADDRESS 


953S 


R907 


614 




LDfl 


#*07 






95 3R 


S51F 


615 




STR 


*1F 






953C 


R20Q 


616 




LDX 


#*00 






953E 


S6FF 


617 




STX 


*FF 






954 O 


S6EE 


61S 




STX 


*EE 






9542 


A4FC 


619 




LDV 


*FC 






9544 


R6FR 


620 




LDX 


*Ffl 




CHECK FLAG 


9546 


E001 


621 




CPX 


**01 






9548 


F007 


622 




BEQ 


LINECG 






954ft 


E002 


623 




CPX 


#*02 






954C 


F023 


624 




BEQ 


FINAL 






954 E 


4C9692 


625 




JMP 


CMPPB 


; 


GO START NEW LINE 


9551 


A5FD 


626 


LINECG 


LDR 


*FD 


• 


GET A-'S ADDRESS 


9553 


8519 


627 




STR 


*19 






9555 


R5EC 


62S 




LDfl 


*EC 


; 


MSB OF fl^S ADDRESS 


9557 


851R 


629 




STfl 


tlR 






9559 


R5FD 


630 




LDfl 


*FD 


\ 


GET RDDR 


955B 


C900 


631 




CMP 


#*00 


I 


ARE WE AT PAGE BGNDAPV? 


955D 


D002 


632' 




BNE 


CNTU 


• 


NO 


955F 


C6EC 


633 




DEC 


*EC 


; 


VES 


9561 


A900 


634 


CHTIJ 


LDR 


tt*@0 


• 


RESET FLAG 


9563 


85FR 


635 




STR 


*Ffl 






9565 


4C9692 


636 




JMP 


CMPPB 


j 


GO START NEW LINE 


9568 


84FC 


637 


FEND 


STV 


*FC 


j 


SET V ASIDE 


956FI 


R902 


638 




LDfl 


#102 


; 


RESET FLAG 


956C 


85FR 


639 




STR 


*FA 






956E 


4CDS94 


640 




JMP 


CERTR 






9571 


ft4EF 


641 


FINAL 


LDV 


*EF 






9573 


R9EC 


642 




LDfl 


#*EC 






9575 


S51F 


643 




STR 


I1F 






9577 


ft900 


644 




LDR 


#*00 


; 


get #*ee 


9579 




645 




PflG 








9579 


91EB 


646 




STfl 


<*EB>iV 


; 


WRITE THREE BYTES 


957B 


208390 


647 




JSR 


INCV 


; 


OF #*06 TO END 


957E 


91 EB 


64S 




STfl 


C«EB),V 


; 


A--S PROGRAM 


9580 


208390 


649 




JSP 


INCV 






95S3 


91EB 


650 




STfl 


<*EB.),V 






9585 


208390 


651 




JSR 


INCV 






9588 


S4RF 


652 




STV 


*ftF 


; 


SET PROPER UflLUES 


95Sft 


S469 


653 




STV 


*69 


; 


TO ZERO PftGE Rv'S 


958C 


S46B 


654 




STV 


166 


1 


POINTERS WHICH 


958E 


846D 


655 




STV 


*6D 


i 


COMPRESSED PROGRAM 


9590 


R5EC 


656 




LDfl 


*EC 


; 


WILL NEED WHEN 


9592 


S5B0 


657 




STR 


*60 


; 


RUNNING 


9594 


856ft 


658 




STfl 


*6R 






9596 


S56C 


659 




STfl 


46 C 






959S 


S56E 


660 




STfl 


*6E 






959ft 


ft9C5 


661 




LDfl 


**C5 






959C 


20F0FO 


662 




JSR 


*F[)FG 


• 


WRITE (ENDS ON SCREEN 


959F 


R3CE 


663 




LDfl 


#*CE 






95ft 1 


20FOFD 


664 




JSR 


*FDFQ 






95FI4 


R9C4 


665 




LDfl 


#*C4 






95A6 


20F0FO 


666 




JSR 


*FDF0 






95A9 


20DDFB 


667 




JSR 


*F6C'D 






95RC 


4CD0O3 


668 




JMP 


*3D0 


•• 


RETURN COMPUTER TO USER 


BSftUE ATOT . PROG .. ft*800 , L*600 








95AF 




669 




DCM 


"BSft'JE ftTOT 


PROG. ft*S00,L*60G" 






670 




END 









REM. Everything, including the colon 
and the second statement, is con- 
sidered part of the remark. Nothing can 
therefore be appended to REM state- 
ments; they are considered terminal 
commands. 

REM statements will be entirely 
eliminated by COMPRESS to save 
space unless they are on called line 
numbers. Programmers who want max- 
imum compression should avoid 
branching to REM statements. COM- 
PRESS cannot eliminate a REM state- 
ment if it is the result of a branch from 
another line; however, it will eliminate 
everything after the REM ($B2), reduc- 
ing the statement to just one token. 

Executing COMPRESS 

Three steps are required to execute 
COMPRESS: 

1. Type BRUN COMPRESS 

2. When the cursor reappears, 
LOAD your Applesoft program. 

3. When the cursor appears again, 
type CALL 36875. 

COMPRESS will respond with: 

END OF PASS #1 
END 

Your program is now compressed! 
To see how much memory-saving com- 
pression took place, try it again, but 
follow these steps: 

Type BRUN COMPRESS 

When the cursor reappears, LOAD 
your Applesoft program. 

Type CALL -151 
Type AF.BO 

The computer will give you the ad- 
dress of the highest memory location 
being used by your current program. 
The high order byte is last, and the low 
order byte first. If, for example, the 
computer responds with: 

OOAF - AA 
OOBO - 1B 

then the top of your Applesoft program 
resides at location $1BAA, and oc- 
cupies the space between $0800 (where 
all Applesoft programs start) and $1BAA. 

Now, type CTRL-C to get back into 
Applesoft. Again type CALL 36875 to 
invoke COMPRESS. After COMPRESS 
is finished, enter the monitor again 
with a CALL -151, type AF.BO again, 
and record the new memory extents. 
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By converting these addresses to 
decimal you can see how effective 
COMPRESS is! (More about that later.) 

One final note on running COM- 
PRESS. Once you have typed BRUN 
COMPRESS and the cursor reappears, 
it is unnecessary to execute this step 
again as long as the computer is not 
turned off, or you do not run any other 
machine-language programs that oper- 
ate up near HIMEM. Simply type CALL 
36875 to invoke COMPRESS. But don't 
forget that COMPRESS occupies nine 
pages of RAM memory, which may be 
valuable space depending on the func- 
tion you wish to perform. A PR#6 will 
erase COMPRESS. 



The Three Steps of COMPRESS 

Step 1: Set HIMEM 

Program steps 3 to 7 tell the com- 
puter that COMPRESS is in the com- 
puter, located just below DOS between 
locations $9000 and $95FF. Also, the 
space $8D00 and S8EFF is reserved for 
the Called Line Number Table, and 
$8F00 to $8FFF for the Compressed 
Statement Buffer. HIMEM is an Apple II 
pointer whose address is stored at loca- 
tion $73 and $74 on the zero-page of 
memory. These two bytes will be set to 
$00 and $8D, respectively, following the 
format we have been using all along of 
placing the least significant byte first. 

After HIMEM is set, control is 
returned to the user and the Applesoft 
cursor |]) reappears. The 'JMP $3D0' 
accomplishes this. At that location, 
Applesoft is reinvoked. 

Step 2: TABLECREATE 

Lines 8 to 62 initialize the memory 
pointers for COMPRESS. While this 
may not be necessary immediately, all 
of the initialization routines are con- 
tained here. 

Lines 63 to 70 are subroutine INCY, 
which is used throughout the program 
to increment the Y register by 1 . If the 
value of the Y register is forced to $00 
(that is, it passes $FF), then the high- 
order byte of the sixteen bit address 
being incremented (which is stored in 
$1F and loaded into the X register) is 
itself incremented with the command 
INC $00,X. 

Lines 71 to 87 are an exit from the 
program and contain the ERROR sub- 
routine. Notice that line 87 returns 
control to the user with a JMP to $3D0. 
Piioi to that, however, the message ER- 



Listing 2: HEXDEC 






le 


REM HEX C ONCER'S I ON ROUTINE 


360 


LET A"-. = UAL <nt i 


20 


HOME 


370 


GOTO 520 


36 


PRINT 


375 


REM CONUERT THE HEX NUMBER 


40 


PRINT 




TO A DECIMAL NUMBER: IF IT I.JH 


50 


INUERSE 




S BETWEEN A AND F 


60 


PRINT " HEXADECIMAL DEC I MHL C 


380 


LET K. - 10 




ONUERSIOtl ROUTINE " 


390 


GOTO 520 


?a 


NORMAL 


480 


LET a;. = 1 1 


60 


PRINT 


410 


GOTO 520 


90 


PRINT 


420 


LET A:-: = 12 


lee 


INPUT "ENTER HEXADECIMAL NUM 


430 


GOTO 526 




BER ~ ";HXI 


440 


LET A:-. = 13 


105 


REM GET THE LENGTH OF THE S 


450 


GOTO 520 




TRIN& TO SEE IF IT IS TOO LU 


460 


LET A:. = 14 




NG FOR: THE CONVERSION. 


47& 


GOTO 520 


lie 


LET K = LEN ';HX*> 


480 


LET a:: = 15 


115 


REN IF THE STRING IS ClUEP 5 


490 


GOTO 520 




DIGITS IT IS TOO LONG. 


500 


LET Ft-: = 


120 


IF K ■> 5 THEN GOTO 140 


510 


GOTO 520 


136 


GOTO 226 


515 


REM ACCUMULATE THE ANSWER. 


135 


REM PRINT THE ERROR MESSAGE 


520 


LET AHS = AHS + 'IMPVR ■* K.J 




RlMD BRANCH TO THE RETURN LO 


530 


NEXT I 




OP. 


540 


PRINT 


140 


PRINT 


550 


PRINT 


ISO 


PRINT 


560 


PRINT 


166 


PRINT 


565 


F;EM PRINT THE ANSWER 


170 


PRINT "INPUT STRING TOO LONG 


570 


PRINT "THE ANSWER IN DECIMAL 




FOR THIS PROGRAM. VOU ARE L 




FOR VCIUR INPUT STRING IS 




IMITED TO FIUE DIGITS." 




- ";FINS 


186 


PRINT 


580 


GOTO 700 


190 


PRINT 


590 


HOME 


260 


PRINT "VOU ATTEMPTED TO ENTE 


600 


PRINT 




R "IK 


610 


PRINT 


210 


GOTO 720 


620 


PRINT 


215 


REM INITIALISE. 


625 


REM INDICATE THAT ONE OF TH 


220 


ANS = 




E CHARACTER'S READ IN WAS NOT 


230 


FOR I = 1 TO K 




A UALID HEX DIGIT - I.E. BE 


246 


LET G!: = K + 1 - I 




TWEEN A AND F. 


250 


LET fit = MID* <HX*,G:-.. O 


630 


PRINT "VDUR INPUT INCLUDED T 


255 


REM SET UP THE PROPER MULT I 




HE CHARACTER ";A* 




PLIER FOR EACH DIGIT OF THE 


640 


PRINT 




HEX NUMBER 


650 


PRINT "THIS OCCURRED IN POSI 


260 


LET MPYR = 16 T ■: I - 1) 




TION NUMBER "JI 


265 


REM IF THE HEX UALUE IS NUM 


660 


PRINT 




ERIC- IT IS OK TO BRANCH AND 


676 


PRINT "<THE FIRST POSITION I 




USE ftS IS. 




S NEXT TO THE DECIMAL P 


270 


IF UAL ^A*.) > O THEN GOTO 




01NT.V 




36.0 


6S0 


PRINT 


275 


REM IF THE UALUE FALLS BETU 


690 


PRINT "THIS IS NOT A HEXADEC 




EEN A FIND F THE DECIMAL NUMB 




IMAL DIGIT. PLEASECHECK VOU 




ER MUST BE CALCULATED FROM T 




R INPUT AND TRV AGAIN." 




HE TABLE. 


700 


PRINT 


280 


IF A* = "A" THEN GOTO 330 


710 


PRINT 


290 


IF A* = "B" THEN GOTO 400 


715 


REM CREATE RETURN LOOP. 


360 


IF A* = "C" THEN GOTO 410 


720 


INPUT "DO VOU WANT TO ENTER 


31U 


IF A* = "D" THEN GOTO 440 




ANOTHER UALUE? - ">UVi 


320 


IF AI = "E" THFN GOTO 4<=n 


73© 


IF UVi = "V" THEN GOTO 20 


330 


IF A* = "F" THEN GOTO 480 


740 


END 


346 


IF ft* = "0" THEN GOTO 500 






350 


GOTO 5^0 







ROR #xx appears on the screen. COM- 
PRESS recognizes three error messages: 

ERROR #01 or ERROR #02: A line 
number that exceeds $FFFF has been 
detected. This can occur during the 
conversion routine if a partial line 
number is followed by an illegal code in 
a branching statement, or a line num- 
ber is specified that exceeds decimal 
65535. Note: line numbers greater than 
63999 will generate an Applesoft error. 
Tokens $30 through $39 are the only 
legal numbers that can be used with a 
program line to represent a line 
number. The program (uncompressed) 
should be RUN to locate the source of 
the Applesoft error. 

ERROR #03: More than 255 Called Line 
Numbers appear in the program. Note 
that these do not have to be different 
numbers to generate an error. More 



than 255 repetitions of the same callec 
line number will create an error condi 
tion. COMPRESS is limited to thi 
number of 16-bit | two-byte) addresse: 
that it can fit between $8D00 anc 
$8EFF, minus 1. 

Line 88, which appears severa 
times throughout the program, loads 
single byte of the uncompressed Apple 
soft program. The command 'LD/ 
($06),Y' instructs the computer to loa 
into the accumulator the contents of 
memory location whose 16-bit (twc 
byte) address is stored starting at locj 
tion $06, least significant byte firsi 
The address at $06 and $07 (initiall 
$00 $08, or $0800) is offset or indexe 
by the contents of the Y register, intiall 
$0, and incremented by subroutin 
INCY described above. When Y = $A; 
for example, the address read into th 
accumulator will be $08 A3. 
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Lines 90 to 141 evaluate the byte 
read-in, and if indeed it is a called line 
number, begin the conversion routine. 

Applesoft stores everything as 
tokens except for addresses and actual 
line numbers, which are stored in hex. 
Even called line numbers appear as 
tokens, occupying the range $30 to $39. 
Applesoft interprets tokens $30 to $39 
as the decimals through 9 with one 
byte (token) per digit. The statement 
'GOTO 456' would appear as '$AB $34 
$35 $36' . Since the actual line numbers 
in the program appear as hexadecimal 
numbers and the called line numbers 
do not, COMPRESS must go through a 
conversion routine. The steps required 
are: 

a. Subtract $30 from the token. 

b. If the value of the result is less than 
zero, then the initial token was less 
than $30, and the result could not 
have been a called line number. 

c. If the value is higher than $0A (hex 
for 10), then the token was greater 
than $39, and was not part of the line 
number. 



d. The field is thus narrowed down to 
the tokens that were originally in the 
range of $30 to $39, and that will, 
after subtracting $30, create a 
decimal digit between and 9. The 
actual conversion of these decimal 
digits to hex can then begin. 

Lines 142 through 220 convert these 
decimalized tokens to their hex- 
adecimal equivalents. Each digit in a 
decimal number has a corresponding 
hex value. The units digit, for example, 
has a value of $1 for each decimal 1. 
Decimal 9 therefore equals $9. The 
tens digit has a hex value of $A for each 
decimal 1. Decimal 40, therefore, has 
the same value as $A + $A + $A + $A. 
The hundreds digit has the value of $64 
for each decimal 1: the thousands $3E8, 
and the ten-thousands $2710. 

Since the computer can add hex- 
adecimal numbers quite easily, a regis- 
ter is incremented by the hex equiva- 
lent of each decimal digit as many 
times as there is value in the decimal 
number. For example, the line number 
30000 would be converted by incre- 
menting the ten thousands equivalent 
three times: $2710 + $2710 + $2710. 



Lines 221 through 251 write the 
called line number to the storage area 
now that it has been converted to hex. 
Since the line numbers in the program 
that precede each statement are already 
hex, the numbers can now be directly 
matched. This takes place after the en- 
tire program is scanned. 

Lines 252 through 280 print the 
message END OF PART #1. 

Step 3: APPEND 

Lines 281 through 302 initialize 
pointers and registers for the Append 
process. Certain values carried over 
from step 2, Tablecreate, are not 
changed, but many working registers 
must be reinitialized for Append. 

Lines 303 to 330 read and evaluate 
each byte of the Applesoft program and 
take certain action if $00 appears. One 
occurrence of $00 indicates a line 
delimiter. If two appear, the computer 
must test to see what the next (third) 
byte may be. There may be two $00 
bytes because the low-order byte of the 
address of the next statement in 
memory happens to be $00. It is also 



VOICE I/O THAT WORKS! 



for the APPLE II and Commodore computers 



Voice I/O has come a long way from the 
barely intelligible computer speech of on- 
ly a few years ago. It is now possible to 
enter data or commands to your computer 
just by talking to it and the computer can 
talk back with clear, pleasant, human 
sounding voice. 

Tne COGNIVOX models VlO-1002 (for 
Commodore) and VIO-1003 (for the Apple 
II + ) are at the Forefront of a new genera- 
tion of Voice \lO peripherals that are easy 
to use, offer excellent performance and 
are affordably priced. 

SOME SPECIFICATIONS 

COGNIVOX can be trained to recognize 
up to 32 words or phrases chosen by the 
user. To train COGNIVOX to recognize a 
new word, you simply repeat the word 
three times under the prompting of the 
system. 

COGNIVOX will also speak with a voca- 
bulary of 32 words or phrases chosen by 
the user. This vocabulary is independent 
of the recognition vocabulary, so a dialog 
with the computer is possible. Memory re- 
quirements for voice response are approx- 
imately 700 bytes per word. 

For applications requiring more than 32 
words, you can have two or more vocabu- 
laries and switch back and forth between 
them. Vocabularies can also be stored on 
disk. 




MA^r^^- 



HOW IT WORKS 

COGNIVOX uses a unique singte-chip 
signal processor and an exclusive non-li- 
near pattern matching algorithm to do 
speech recognition. This gives reliable op- 
eration at low cost. In fact, the perfor- 
mance of COGNIVOX in speech recogni- 
tion is equal or better to units costing 
many times as much. 





For voice output, COGNIVOX digitizes 
and stores the voice of the user, using a 
data compression algorithm. This method 
offers four major advantages: First there 
are no restrictions to the words COGNI- 
VOX can say. If a human can say it, COG- 
NIVOX will say it too. Second, it is very 
easy to program your favorite words. Just 
say them in the microphone. Third, you 
have a choice of voices: male, female, child, 
foreign. Fourth and foremost, COGNIVOX 
sounds very, very good. Nothing in the 
market today can even come close to the 
quality of COGNIVOX speech output. You 
can verify this yourself by calling us and 
asking to hear a COGNIVOX demo over 
the phone. Hearing is believing. 

A COMPLETE SYSTEM 

COGNIVOX comes assembled and test- 
ed and it includes microphone, software, 
power supply, built in speaker/amplifier 
and extensive user manual. All you need 
to get COGNIVOX up and running is to 
plug it in and load one of the programs 
supplied. 



It is easy to write your own talking and 
listening programs too. A single state- 
ment in BASIC is all that you need to say 
or recognize a word. Full instructions on 
how to do it are given in the manual. 

COGNIVOX model VIO-1002 will work 
with all Commodore computers with at 
least 16k of RAM. Model VIO-1003 re- 
quires a 48k APPLE II -+ with 1 disk drive 
and DOS 3.3. 

ORDER YOUR COGNIVOX NOW 

Call us at (805) 685-1854 between 9am 
and 4pm PST and charge your COGNIVOX 
to your credit card or order COD. Or send 
us a check in the mail, specifying your 
computer. Price for either model of COG- 
NIVOX is $295 plus $4 shipping in the U.S. 
(foreign add 10% we ship AIR MAIL). 

VOICETEK 

Dept , P.O. Box 388 Goleta, CA 93116 

Also available for the AlM-65. 
Call or write for details. 



Remember when... 

Grandma used envelopes for pay- 
ing her bills, and it worked? 

Now... 

Grandma's system has been con- 
verted for your standard VIC® . Now 
it looks like a checkbook and works 
like a payroll deduction. It reserves 
your funds for what's due, and tells 
you what's left to spend. 

Includes 4 Routines 

on cassette tape... 

• Checks 
• Deposit 
• Reconcile 
• Maintenance 

Check or money order accepted 
for $17.95 plus $1.50 postage and 
handling. 



RAM/RBC SYSTEMS 

P.O. Box 351 
Maiden, MA 02148 

Trademark of Commodore 
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possible that the computer has en- 
countered the end of the program. This 
condition is detected in Applesoft by 
the occurrence of three $00 bytes. 

Lines 331 through 404 search the 
Called Line Number Table residing at 
$8D00 to $8EFF and preserve the line 
number if it appears. All elements must 
be checked since the called line num- 

MICRObits 

•.;.. (Continued, from page 38) 
Strictly Commodore 

The bi-monthly software-oriented 
publication entirely devoted to 
VIC-20, PET, CBM, and SuperPET 
owners. Each issue contains four to 
six full-length entertaining programs, 
detailed product reviews, 
programming tips, plus latest 
Commodore news. Subscription $15; 
sample $2. 

Strictly Commodore 

47 Coachwood Place N.W. 

Calgary, Alta. 

Canada T3H 1E1 



PET Joystick Interface 

Connects directly to all PET/CBM 
computers Allow; PET to accept 
eilhtfr Apple joy<.iii_ks/paiidles or 
Atari joysticks No assembly required. 
Keady to pint; into the user port. 
Software provided Immediate 
delivery Onlv $49 ( >5- Michigan 
residents add 40«i sales tax. 

Systems Corp 

1 Edmund Place 
; Ann Arbor. MI48UH 



OSI Super Defender 

Super Defender is an all -machine-code 
game mst like the arcades The 
mountains roll by as your scanner 
show- wh.it's coming at you. Protect 
your humanmds from being snacched 
It. the lauding ciafts. S14 95 for tape 
Or S 4 "disk 

ll.MI' Svsrcms 

.M 1 * Hampton Blvd 

Rochester, NY U612 

Books You'll Need 

C50 13 Software Driign - S 12.95, 
I' riorum minx ar.d Interfacing the 6502 
- Sid. 1 '-'!, o«09 Microcomputer 
Prtixmmaiinx t? 1 Jnlrrfacing - S14.95, 
tiHiKX)- Principles o' Programming - 
$l-t so, Advanced 6502 Interfacing - 
$12.95. Add $2.75 handling. Foreign 
add $~ («). Ti'xas residents add 596 
tax Send to: free list 

Phil's Books 

I>pt MCI 

1" (). Hot 1209M 
.■"'-.' Ailinnton, TX "'6(112 

AKRO" 



bers are stored in the order they occur 
in the program. 

Checking a 16-bit address with an 
8-bit processor like the 6502 involves 
some complexity. The low-order bytes 
of the Called Line Number Table are 
checked against the low-order byte of 
the line number being read. If there is a 
match, which is quite likely, the high- 
order bytes are checked. If they match 
also, the line number must be saved. 

Lines 405 through 547 look for ter- 
minal commands, REM statements, 
etc., and act to terminate a line if any 
are found. 

Lines 548 through 554 back up if 
more than 239 bytes have been written 
and a natural end-of-line has not been 
located. In such cases the computer 
must search backwards until the pre- 
vious end of statement is encountered. 

Lines 579 to 638 write the com- 
pressed statement to the normal RAM 
storage location for Applesoft programs 
($800 upward). Note that after com- 
pression the program is written directly 
over the original uncompressed pro- 
gram. Since COMPRESS can only 
shorten a program and can never 
lengthen it, there is never danger that a 
program will be written over part of the 
unread original program. 

Lines 639 through 669 terminate 
the COMPRESS program and write the 
final pointers into the normal Apple- 
soft zero-page locations, as well as 
print 'END' on the screen. 

Line 670 returns control to the user 
with a JMP to $3D0. 

Final Notes 

COMPRESS works with most 
Applesoft programs. Certain conven- 
tions used by some programmers may 
make COMPRESS unable to do its job. 
Some authors have sprinkled $20 
tokens ($20 is the Applesoft representa- 
tion for space) into called line number 
areas of their programs to discourage 
unauthorized copying. While this is 
not the only condition that will 'fool' 
COMPRESS, it is typical of unconven- 
tional programming techniques that 
COMPRESS cannot handle. 

Included with this article as listing 
2 is an Applesoft program named HEX- 
DEC. This program can serve two pur- 
poses: it is a good test program to ran 
through COMPRESS, and it will also 
enable the user to convert the ad- 
dresses located at $AF and $B0 to 



decimal. Then the user will be able to 
see how much memory usage has been 
eliminated through the use of 
COMPRESS. 

To use HEXDEC, enter the values 
located at $AF.B0 (reverse them first of 
course) and get the decimal equivalent. 
Subtract the equivalent of $800 
(decimal 2048) to find out how many 
bytes of storage your program takes. 
Do the same after a compression run 
and then calculate the difference. 

HEXDEC itself occupies 1906 bytes 
of storage before compression, and 964 
after ($0F72 - $800 = decimal 1906: 
$0BC4 - $800 = decimal 964). This 
amounts to a 49.5% memory reduction! 

While admittedly this is an extreme 
example, which was exaggerated solely 
to show what COMPRESS can do, the 
basic idea is not far-fetched. The pro- 
grammer now has the liberty to write 
many REM statements and put one 
statement per line for later editing if 
necessary. 

A wordy original Applesoft program 
now does not exact an execution penalty. 
COMPRESS can optimize the code prior 
to execution. All debugging should of 
course be done before compression. 
Leaving the original program intact 
allows the user to make later changes 
as necessary, and then recompress the 
code. 

One final note of caution: the name 
under which the COMPRESSed pro- 
gram is saved to disk must be differeni 
than the original program or tlie 
original will be lost. One suggestion ir 
this regard is to add ".COMP" to th« 
old program name when SAVEing the 
compressed version. For example 
PAYROLL could be the origina 
lengthy version, and PAYROLL. COMI 
the compressed code. 

The compilers' promise of dramat 
ically increased execution speed ha: 
not been fulfilled to the extent tha 
users expected. And the compiled cod< 
may actually require geater memor 
space. With COMPRESS, you cai 
achieve many of the same goals at sub 
stantially lower cost, while preservin; 
all of the important features of the Ap 
plesoft language originally envisionei 
by the designers of the Apple II. 



Barton M. Bauers may be contacted at 30 
Hillock Drive, Wallingford, Connecticut 
06492. 

JMCftO 
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It's like having an Uncle in the Business 

All Prices Discounted. Get an additional 3%* 



ADVENTURE INTERNATIONAL 

Commbat $22.00 

Tunnel Terror $25.00 

War $22.00 

Rear Guard $25.00 

NEW GRAPHIC ADVENTURES 

S.A.G.A. 1 Adventureland $25.00 

S.A.G.A. 2 Pirates Adv $25.00 

S.A.G.A. 3 Mission Imp $25.00 

S.A.G.A. 4 Voodoo Castle $25.00 

AUTOMATED SIMULATIONS 

Fore! $25.00 

Crush, Crumble & Chomp $25.00 

Tues. Morn Quarterback $25.00 

AVALON HILL 

Computer Aquire $22.00 

Computer Stocks & Bonds $22.00 

BEZ 

BezOff $27.00 

BRODERBUND 

Choplifter $29.00 

Serpentine $29.00 

Deadly Secrets Hi-Res $29.00 

CPU SOFTWARE 

Oil Rig $33.00 

Human Fly $33.00 

COMPUTEK 

Solitaire $25.00 

CAVALIER 

Bug Attack $25.00 

Microwave $29.00 

DATAMOST 

Gin Rummy $29.00 

Pig Pen $25.00 

Kids & The Apple (Book) 

For Kids From 6 to 60 + $19.00 

Casino $33.00 

Swashbuckler $29.00 

Solo Poker $25.00 

Baseball $25.00 

Missing Ring $25.00 

Country Fair $25.00 

Thief $25.00 

Snack Attack $25.00 

DATASOFT 

Tumble Bugs $25.00 

GEBELLI 

Neptune $25.00 

LazerSilk $25.00 

Zenith $29.00 

Russki Duck $25.00 

INFOCOM 

Zork I $33.00 

Zork II $33.00 

Deadline $42.00 



MICRO LAB 

Roach Hotel $28.00 

Peeping Tom $28.00 

MUSE 

Firebug $22.00 

Frazzle $22.00 

ON LINE SYSTEMS 

Hi Res Asteroid $22.00 

Hi Res Mystery House $22.00 

Roadwork $33.00 

Jawbreaker (Improved) $25.00 

Mouskattack $28.00 

Ulysses/Golden Fleece $28.00 

Wiz & Princess $28.00 

Frogger $28.00 

Cannonball Blitz $28.00 

PICCADILLY 

Star Blaster $25.00 

Ribbit $25.00 

ROCKROY 

Conglomerates Collide $33.00 

SIRIUS SOFTWARE 

Twerps $25.00 

Dark Forest $25.00 

Jellyfish $25.00 

Minotaur $29.00 

Bandits $29.00 

SIR-TECH 

Wizardry $39.00 

Knights of Diamonds $29.00 

(Scenario #2 for Wizardry) 

STRATEGIC SIMULATIONS 

Cytron Masters $33.00 

Cartels & Cutthroats $33.00 

Shattered Alliance $49.00 

Computer Bismark $49.00 

Computer Ambush 2nd Ed $49.00 

SUB-LOGIC 

Flight Simulator $28.00 

Pin-Ball/A Great Pinball 

Game $25.00 

Saturn Navigator $29.00 

SYNERGISTIC SOFTWARE 

Nightmare Gallery $29.00 

U-Boat Command $29.00 

Atlantis $33.00 

Escape From Arcturus $29.00 

TURNKEY SOFTWARE 

Ceiling Zero $25.00 

The Gauntlet $29.00 

ACCOUNTING 

Accounting Plus $318.00 

Bus. Bookkeeping Sys $314 

Mod#1 Gen. Ledger $199.00 

Mod#2Acct. Rec $199.00 

Financial Partner .-5189.00 

Gen Ledg & Pay $389.00 

Invoice Factory $166.00 

Prof Time& Billing $328.00 

COMMUNICATIONS 

ASCII Express $66.00 

Data Capture 4.0 $54.00 

Data Capture 4.0 80 Col $75.00 

COMPILERS 

Expediter II + $113.00 

Tasc Compiler $139.00 

DATA BASE 

D.B. Master $178.00 

Filefax $159.00 

The General Manager $124.00 

PFS: Personal Filing Syst $99.00 

Versa Form $309.00 

DATA BASE APPLICATION DEV. 

D. Base II $524.00 

DATA BASE UTILITY 

D.B. Master Stat Pak $83.00 

D.B. Master Utility Pak I $83.00 

D.B. Master Utility Pak II $83.00 



DATA ENTRY 

Datastar $235.00 

EDUCATIONAL 

Counting Bee $25.00 

Decimals $39.00 

The Learning System $124.00 

Master Type $33.00 

SAT Word Attack $39.00 

Speed Reading $149.00 

Whole Brain Spelling $30.00 

FINANCIAL MODEL/PLAN. 

Asset Manager $159.00 

Calcstar $159.00 

Creative Financing $159.00 

Visicalc $191.00 

WallStreeter $229.00 

GRAPHICS 

Arcade Machine $37.00 

Budges 3D Graphics $33.00 

E-Z Draw 3.3 $39.00 

Graphics Magician $49.00 

Hi-Res Secrets $99.00 

HOUSEHOLD ACCOUNTING 

The Home Accountant $65.00 

MATHEMATICS/ENGINEERING 

Mathmagic $74.00 

MAILING LIST 

First Class Mail $59.00 

The Mailroom $29.00 

MUSIC/SOUND/SPEECH 

Apple Talker $25.00 

The Voice $33.00 

PROP. MGMT/REAL ESTATE 
R.E.A.P 

(The Best I Have Seen) $103.00 

TAX 
Loophole Louie Loves The 

Tax Beater $105.00 

UTILITY 

Back It Up $44.00 

Mem. Mgmt. Syst. II $39.00 

Mulli Disk Catalog $20.00 

Super Disk Copy III $25.00 

UTILITY— PROGRAMMING 

Apple Doc $39.00 

Apple Mechanic $25.00 

Apple Spice $25.00 

Bag of Tricks $33.00 

Menu Generator $33.00 

Programming Aids $74.00 

The Bug $39.00 

UTILITY — PRINTER 

Zoom Graphics $33.00 

WORD PROCESSOR 

Exec. Secretary $189.00 

Format II $259.00 

Screenwriter II $99.00 

Wordstar Req Softcard $249.00 

Write-On! II Loaded with Features 
Found in W/P SAW costing more 
than double the price $99.00 



YANKEE PEDDLER 

10810 Cantara Street 

Sun Valley, CA 91352 

(213)896-3642 



'Take an additional 3% discount if a check (certified, cashiers or personal) accompanies the 
order. Please allow 14 days for personal check clearance. We also accept MasterCard and Visa. 
Please enclose both number and exp. date. Please add 5% for shipping & handling. Minimum 
shipping & handling charge is $1.50. Foreign order minimum $75.00 plus 12% shipping & handl- 
ing (except Canada). If we deem that shipping & handling charges are excessive, we will return 
the excess to you. Calif residents add 6.5% tax. 

PRICES SUBJECT TO CHANGE WITHOUT NOTICE. 



FREE GIFT 

with any 

software order 

over $40.00 



With any order 

of $100 or more 

you may select 

any one of the 

following at these 

fantastic prices! 

Computer Aquire $18.00 

Bez Of f $24.00 

Choplifter $25.00 

Serpentine $25.00 

Deadly Secrets Hi-Res $25.00 

Pig Pen $19.00 

For Kids & The Apple (Book) $15.00 

Swashbuckler $21 .00 

Thief $19.00 

Snack Attack $19.00 

Zork I $29.00 

Zork II $29.00 

Nightmare Gallery $25.00 

Sat Word Attack $33.00 

Speed Reading $129.00 

Hi-Res Secrets $85.00 

R.E.A.P. (The Best I Have Seen) $85.00 

Tax Beater $85.00 

Back It Up $39.00 

Bag of Tricks $28.00 

Menu Generator $28.00 

With any order 

of $200 or more 

you may select 

any one of the 

following at these 

Super Low Prices! 

Bus Bookkeeping Sys $275.00 

Versa Form $259.00 

DBase II $450.00 

Datastar $180.00 

Visicalc $175.00 

WallStreeter $200.00 

Format II $229.00 
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Book Reviews 



by John Valente 



68000 Assembly Language Programming, 
by Gerry Kane, Doug Hawkins and 
Lance Leventhal. Osborne/McGraw- 
Hill, 1981. ISBN: 0-931988-62-4. 
Paper, 680 pages, $16.99. 

68000 Microprocessor Handbook, by 
Gerry Kane. Osbome/McGraw-Hill, 
1981. ISBN: 0-931988-41-1. Paper, 200 
pages, $6.99. 

These two volumes are the only widely 
available texts on the 68000. Fortu- 
nately, they are excellent. As of this 
writing, the only 68000 computers 
available are expensive business- 
oriented systems. {Editor's note: 
Motorola has announced a 68000 
Educational Computer Board ($495.00) 
that will make it much easier to begin 
learning the 68000.) These two books 
should thoroughly prepare you for using 
the full power of the 68000. Even a 
casual glance shows this processor to 
be truly a "new generation" device. 

Both volumes continue the tradi- 
tion of quality in the Osborne series. 
They are well-written, concise, and 
clearly printed. Major points are in 
boldface, so the reader may find desired 
information quickly. Diagrams abound. 
Extensive indexes are included. The 
authors stick to the point and do not 
waste words; the reader should have 
some familiarity with microprocessor 
architecture and machine language. 

68000 Assembly Language Program- 
ming begins with a discussion of the 
merits and deficiencies of assembly 
language. Some readers may have read 
similar material in other books on 
assembly-level programming. Still, the 
material is worth reading as an over- 
view. A detailed description of a typical 
assembler follows; it is a very good 
tutorial, and applies to any processor. It 
also acquaints the reader with the ter- 
minology used throughout the text. 

Chapter 3 gets to the heart of the 
matter: 68000 Machine Structure and 
Assembly Language. The author des- 
cribes clearly the user/ supervisor oper- 



ating modes and the register set. Dia- 
grams help to explain the various ad- 
dressing modes, showing exactly what 
is happening in the machine. 

The next few chapters develop fam- 
iliarity with the instruction set through 
example programs that get progres- 
sively more difficult. The problems are 
typical of those selected in assembly- 
language texts: simple arithmetic, code 
conversion, tables, and lists. The 
reader, who may have seen these prob- 
lems before, sees how they can be solved 
in the 68000 environment. 



The third section presents "Ad- 
vanced Topics" such as parameter 
passing and subroutines. The 68000 is 
particularly adept at these applications. 
Powerful instructions facilitate relo- 
catable and re-entrant routines. I would 
have liked more coverage of the LINK 
and UNLINK instructions, which are 
both new and apparently very useful. 

The next three chapters cover I/O 
using the 6821 PIA and the 6850 ACIA. 
Projects range from controlling a single 
LED to an A/D converter. The use of 
these chips is not new, and some 
readers may not need to read this sec- 
tion. However, the material is relevant, 
since new I/O chips for the 68000 are 
not yet available. In fact, the 68000 has 
special signals to communicate with 
the "older generation" 6800-series 
devices. 

Chapter 15 is an important one, 
dealing with exception processing. 
Most of us have used NMI and IRQ in- 
terrupts, but these are merely two 
members of a whole class of excep- 
tions. Others are bus and address error, 
reset, illegal operations, trace, trap, and 
multiple vectored interrupts. There is 
even a provision for extending the in- 
struction set. Exception processing can 
service many peripherals in a very 
sophisticated system. The material 
covered here is complex, but close 
study will make it possible to take full 
advantage of the 68000. 



Section 4 covers software develop- 
ment, from problem definition through 
testing and debugging. The insights 
presented here are essential to good 
programming practice, particularly for 
those inclined to jump from vague 
ideas to coding. The summary of 
typical errors is particularly enlight- 
ening, and can save you hours of 
frustration. In a rare departure from 
their serious tone, the authors offer 
some good advice: "Sometimes the 
following approach may be your best 
bet: turn off the computer, have a beer, 
and let your brain rest." (p. 19-21) 

The remainder of the book alone 
would be worth the price. Each instruc- 
tion is thoroughly described in alpha- 
betical order. Accompanying diagrams 
show precisely the flow of data be- 
tween registers and memory. Charts in- 
dicate the op-codes for the various ad- 
dressing modes. This is very handy for 
quick reference while learning a new 
instruction set. And if that's not 
enough, there are three tabular appen- 
dices: the first is a listing of the instruc- 
tion set by mnemonic that includes 
number of bytes, clock cycles, effects 
on registers, and a functional sum- 
mary. The second is an alphabetical 
listing by mnemonic, with op-codes, 
byte count, and clock cycles. The third 
lists the op-code in ascending numerical 
order. These listings are a gold mine of 
information for the serious programmer. 



I did notice a few errors in several 
programs and schematic diagrams, but 
they are minor. Each chapter concludes 
with a set of problems and a list of per- 
tinent references. Some readers might 
wish the authors had omitted the gen- 
eralized chapters on software develop- 
ment for the sake of a lower price. I 
think the price would be justified even 
without such material, given the quality 
of the text. Because the 68000 is a com- 
plex device, this book is not for casual 
reading. Fortunately, the authors and 
editors have made the work as painless 
as possible. 
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The 68000 Miciopiocessoi Hand- 
book is for the hardware designer and 
advanced programmer. If a micro- 
processor data sheet intimidates you, I 
do not recommend this book. On the 
other hand, if you can work from a very 
compact reference, and particularly if 
you are developing system hardware, 
this one is for you. Every pin and signal 
of the 68000 is concisely described. 
Diagrams are used extensively for bus 
cycle timings and data movement be- 
tween registers and memory. There is 
no tutorial information on the instruc- 
tion set, and no program examples are 
given. However, there is a brief descrip- 
tion of the instruction groups, with em- 
phasis on the more unusual ones. Two 
concise appendices list the entire in- 
struction set by mnemonic and by op- 
code, as in the other book. 

I especially liked the two-page in- 
troduction, which gives the reader a 
feel for the uniqueness of the 68000 and 
compares it to the 8086 and the Z8000. 
Since many of the new machines will 
use 16-bit processors, this will help you 
evaluate the various CPUs. The in- 
troduction convinced me that the 
68000 is potentially the most powerful 
of the three. 

The conventions used in the dia- 
grams are clearly described before the 



text begins. A functional overview of 
the 68000 precedes chapters on bus 
timing and operation, exception pro- 
cessing, addressing modes and inter- 
facing to 6800 peripherals. Selected 
data sheets are included at the end. 

The text is very detailed, and very 
technical. The emphasis is on hardware 
design; all the material you need for 
programming can be found in the other 
volume. Only if you are capable of pro- 
gramming from a terse listing of a new 
instruction set should you rely on this 
volume for software development. 
Nonetheless, it is an excellent "stand- 
alone" guide to the 68000. For the ex- 
perienced designer, it lives up to its 
title as a Handbook. 

When you read about the 68000, I 
think you will be impressed. Users of 
the 6502 and 6809 will see some basic 
similarities, such as memory-mapped 
I/O and extensive addressing modes. 
However, the 68000 is a more complex 
processor with many new features. Its 
speed, 32-bit registers, and provision 
for multiple users, put it into the 
minicomputer class. Many analysts see 
a lack of software as a stumbling block 
to its acceptance. Perhaps readers of 
these two books will help solve this 
problem. 

JMCftO 



O.S.I. CI P, C4P &C8P 
TRS-80 Models I & III 



The Room's o-f Cygnes IV 

You are in a roo* mth walls placet) randomly throughout, There ore 
three to ten ROBOTS bent on destroying you with laser (ire or bv 
touching you. You lust destroy all the robots in a moi to advance a 
level. The higher the level the faster Itie robots. HATCH-OUT the *alls 
are electrified 1 ' There are tw skill levels. 
O.S.J. C4P i C8P - Color, Sound & Joysticks BK Cassette - J9.95 
Trs-SO I & III Sound both J2K cassette and 32K disk version- 112.15 

Murder Mansion - Advent Lire ttl 

You and seven other people are exploring a three story house for a 

treasure, UATCH-0UI" Soieane has decided to get a little greedy and 

is killing the others. You could Be NEIT" 

Tr 5-8O version has a graphic representation of each raoi 1 ' 1 

O.S.I. C1P, C4P t CBP - W Cassette - 112. ?5 

Irs-80 I i III (Eraphics) 32K Cassette and W list version - 116.15 

B 1 aster Attack 

Ihts is a tuo plaver gate nhere you ha»e to protect your country (ran 
overhead spy-craft. You jnd your opponent lust shoot do»n n iany 
eneiy craft with your LASER-BASE before your ti»e runs out. Excellent 
sound and graphics. You can play the cotputer or a huian opponent. 
You both will use the s*«e playing held at the saie tite' 11 
Q.S.I, C4P i CBP ■ Sound SK Cassette - 17.95 

Novas tar 

You are a lone warrior gn a seek and destroy ussion. You've been sent 
ti> ALKBERQN to destroy * CYCLOK fuel stations which are protected by a 
CYCLON fighter sgadron. You -ill have 5 oldstyle nuclear -arheads to 
destroy the stitions. At the saie tile you mil have to dogfight the 
CYCLON fighters'!" 
O.S.I. C<P i CBP - Color \ Sound 8k Cassette - 16.95 

Bunkers 

This is a two player gaie in which you lust destroy 5 of tour ooponents 
bunkers by shooting over i ruqged lounUifl. You control your luzile 
velocity and barrel angle. Great COLOR graphics ana sound. 
O.S.I. C4P k CaP - Color i Sound 8K Cassette - 17.95 



Send $1.00 for catalog 

COMP-U-GAMER SOFTWARE 

P.O. Box 802 

Nevada, Missouri 64772 



Perry PERipheRAls Repairs KIMs!! 

(SYMs ANd AIMs Too) 

We will Diagnose, Repair, and Completely Test your Single Board Computer 

We Socket all replaced Integrated Circuits 

You receive a 30-day Parts and Labor Warranty 

Your repaired S.B.C. returned via U.P.S. — C.O.D., Cash 

Don't delay! Send us your S.B.C. for repair today 
Ship To: (Preferably via U.P.S.) 

Perry PerjpLieraLs 

6 Brookhaven Drive 
Rocky Point, NY 11778 

KIM-1 RepLacement ModuUs 

• Exact replacement for MOS/Commodore KIM-1 S.B.C. 

• Original KIM-1 firmware — 1K and 4K RAM versions 

RepIacement KIM-1 KEyboARds 

• Identical to those on early KIMS — SST switch in top right corner 

• Easily installed in later model KIMs 

Perry Peripherals is an authorized HDE factory service center. 

Perry Peripherals carries a full line of the acclaimed HDE expansion components for you KIM, SYM, and AIM, 
including RAM boards, Disk Systems, and Software like HDE Disk BASIC V1. 1. Yes, we also have diskettes. For 
more information write to: P.O Box 924, Miller Place, NY 11764, or Phone (516) 744-6462. 
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BOX 120 

ALLAMUCHY, N.J. 07820 

201-362-6574 



HUDSON DIGITAL ELECTRONICS INC. 



THE TASK* MASTERS 



HDE supports the *TIM, AIM, SYM and KIM (TASK) with a growing line of computer programs and 
peripheral components. All HDE component boards are state-of-the-art 4V2" x 6V2", with on board 
regulation of all required voltages, fully compatible with the KIM-4 bus. 



OMNI DISK 65/8 and 65/5 

Single and dual drive 8" and 5 1 /*" disk systems. 
Complete, ready to plug in, bootstrap and run. 
Include HDE's proprietary operating system, 
FODS (File Oriented Disk System). 



HDE DISK BASIC 

A full range disk BASIC for KIM based systems. 
Includes PRINT USING, IF . . . THEN . . . ELSE. 
Sequential and random file access and much 
more. $175.00 



DM816-M8A 

An 8K static RAM board tested for a minimum of 
100 hours and warranted for a full 6 months. 



HDE ADVANCED INTERACTIVE 
DISASSEMBLER (AID) 

Two pass disassembler assigns labels and con- 
structs source files for any object program. 
Saves multiple files to disk. TIM, AIM, SYM, KIM 
versions. $95.00 



DM816-UB1 

A prototyping card with on-board 5V regulator 
and address selection. You add the application. 



HDE ASSEMBLER 

Advanced, two pass assembler with standard 
mnemonics. KIM, TIM, SYM and KIM cassette 
versions. $75.00 ($80.00 cassette) 



DM81 6-P8 

A 4/8K EPROM card for 2708 or 271 6 circuits. 
On board regulation of all required voltages. 
Supplied without EPROMS. 



DM816-CC15 

A 15 position motherboard mounted in a 19" 
RETMA standard card cage, with power supply. 
KIM, AIM and SYM versions. 



DISK PROGRAM LIBRARY 

Offers exchange of user contributed routines 
and programs for HDE Disk Systems. Contact 
Progressive Computer Software, Inc. for details. 

AVAILABLE DIRECTOR 



HDE TEXT OUTPUT PROCESSING SYSTEM 
(TOPS) 

A comprehensive text processor with over 30 
commands to format and output letters, docu- 
ments, manuscripts. KIM, TIM and KIM cassette 
versions. $135.00 ($142.50 cassette) 

HDE DYNAMIC DEBUGGING TOOL (DDT) 

Built in assembler/disassembler with program 
controlled single step and dynamic breakpoint 
entry/deletion. TIM, AIM, SYM, KIM AND KIM 
cassette versions. $65.00 ($68.50 cassette) 

HDE COMPREHENSIVE MEMORY TEST 
(CMT) 

Eight separate diagnostic routines for both 
static and dynamic memory. TIM, AIM, SYM, 
KIM and KIM cassette versions. $65.00 ($68.50 
cassette) 

FROM THESE FINE DEALERS: 



Progressive Computer Software 
405 Corbin Road 
York, PA 17403 
(717)845-4954 



Johnson computers 

Box 523 

Medina, Ohio 44256 

(216)725-4560 



Lux Associates 
20 Sunland Drive 
Chico, CA 95926 

(916) 343-5033 



Falk-Baker Associates 

382 Franklin Avenue 

Nutley, NJ 07110 

(201) 661-2430 

Laboratory Microcomputer Consultants 

P.O. Box 84 

East Amherst, NY 14051 

(716)689-7344 



Perry Peripherals 

P.O. Box 924 

Miller Place, NY 11764 

(516) 744-6462 



Reviews in Brief 



Product Name: 
Equip, req'd: 

Price: 
Manufacturer: 



SIGMON 

TRS-80C Color Computer 

with 16K memory 

$29.95 

Datasoft, Inc. 

19519 Business Center Dr. 

Northridge, California 91324 
Description: SIGMON, a comprehensive assembly- 
language monitor for the Color Computer, is distributed 
on cassette. This versatile monitor incorporates a full 
disassembler and a line-by-line assembler, which doubles 
as a memory modify mode; it allows decimal, hexadecimal, 
and literal text to be entered while inserting the correct 
binary values in memory. Other abilities include the fol- 
lowing: display memory in an 8-column format, showing 
both hexadecimal and ASCII characters. An optional 
display shows graphics characters for that range of binary 
numbers. The LIST command displays memory contents 
by memory location in a 25-column format. A data-search 
routine searches for text, hexadecimal values, or hex- 
adecimal values specified as assembly-language mne- 
monic string. 

Pluses: The large number of functions makes a very 
capable package. Extensive documentation is furnished, 
including a full assembly dump with comments. In par- 
ticular, the string search is powerful and versatile. 

Minuses: Some points of syntax are not covered in the in- 
structions. The approximately 6.5K-byte program is not 
available in ROM, and is an inconvenient size for user- 
loading in ROM. 

Skill level required: The user must be moderately familiar 
with assembly language before he can use any monitor 
effectively. 

Reviewer: Ralph Tenny 



Product Name: BUGOUT 

Equip, req'd: TRS-80C Color Computer 

with 16K memory 
Price: $19.95 

Manufacturer: Spectral Associates 
141 Harvard Avenue 
Tacoma, Washington 98466 
Description: BUGOUT is a small (<1800 bytes), well 
done assembly-language monitor for the Color Computer. 
Memory modification can be accomplished in two modes: 
normal examine/ modify mode called (S)ubstitute, and 
(AJSCII, which enters ASCII codes in memory directly 
from keystrokes. A (F)ill mode allows entry of a given 
value in each location of a block of memory. The (M)ove 
memory command allows any memory move, including 
overlapping code. Two display modes are available: (Dis- 
play memory in normal screen dump format, and (T)ype, 
which displays memory contents in ASCII. The cassette 
handlers are (W)iite, which records assembly language in 



CLOADM format, and (R)ead, which loads only files made 
with CSAVEM, W, and CSAVE. In addition, the filename, 
start address, file type, and last address are displayed. 
Also, the R command allows an offset to be specified to 
avoid conflict between programs. Debug and auxiliary 
commands are also available. 

Pluses: Low cost, simple syntax, short learning curve, and 
convenient, comfortable operation. The S command is an 
excellent and unique enhancement. 

Minuses: No printer output available; no listing furnished. 
The display scroll speed is too fast, and the V command 
should be able to verify cassette tapes. 

Skill level required: As with any other monitor, the user 
should have some assembly-language experience. How- 
ever, this monitor is perhaps the simplest to use and ex- 
cellent for beginners. 

Reviewer: Ralph Tenny 



Product Name: 
Equip, req'd: 



Price: 
Manufacturer: 



PAL (Personal Assembly Language) 

Versions for all Commodore 
computers except the original BASIC 
1.0 PET. Printer and Commodore disk 
or tape optional. 
$50 

Brad Templeton 
271 Westcourt PL #201 
Waterloo, Ontario N2L 2R8 
Canada 
Description: PAL is a complete 6502 assembler, entirely in 
machine language. Its syntax is like that of Commodore's 
own assembler, except that it uses ordinary program files 
instead of sequential data files. This assembler is used by 
some of the best known PET programmers. 

Pluses: Like its companion program, POWER, PAL is ex- 
tremely simple in concept, flexible in use, and powerful in 
skilled hands. It occupies only 4K of memory, and may 
easily be placed in EPROM to leave even more memory 
free. (It is able to hold its own 4K unassembled source code 
in a single file.) PAL is also extremely fast, assembling 
itself in under 10 seconds after disk access time. It uses the 
familiar BASIC screen editor, POWER, or any other pro- 
grammer's aid, allowing highly flexible editing without 
learning a new set of commands. PAL includes an un- 
assemble^ and a converter for MAE assembler source files. 
The latest version is also able to create relocatable code. 

Minuses: Doesn't handle macros, though that skill is 
planned in an update. BASIC doesn't preserve leading 
spaces in source files when they are edited. Thus, source 
files look a bit cramped before assembly. 

Documentation: The manual is well printed and quite 
readable for skilled users. Beginners should probably buy 
another 6502 machine-language quide to go along with 
PAL's manual. 
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Skill level requited: Must be familiar with BASIC'S screen 
editor and 6502 assembly language. 

Reviewer: fames Strasma 



Product Name: Disk Utility Pack 

Equip, req'd: Commodore computer and disk drive 

Price: $35 

Manufacturer: Dick Immers 

152 Brookfield Ct. 

Adrian, Michigan 49221 
Description: Has three main features: 1. includes a safe 
and versatile disk monitor called ZAP PET, which is much 
like Micromon, but for the disk rather than the computer; 
2. attempts an automatic disk recovery after otherwise 
fatal data errors, (such as doing a short "new" to reformat 
the diskette, or leaving the disk in place while switching 
disk power off and on); and 3. catalogs up to 99 diskettes. 

Pluses: ZAP PET is reliable in use. It has been carefully 
developed as a doctoral project over the past two years, and 
has overcome many of the limitations of similar programs. 
It is also the only such program that uses the hexadecimal 
and ASCII data used by the better computer monitors. ZAP 
PET alone is worth the price of the entire package. The 
disk recovery modules, MAYDAY and EAT MY DISK, are 
able to restore most or all of the data on diskettes that have 
been damaged accidentally. The additional data stored by 
the cataloging programs allows a lost directory to be 
restored quickly and easily from the catalog. 



ENGINEERS/TECHNICIANS 

THE MICRO 68000 
IS DESIGNED FOR YOU! 

COMPLETE, READY-TO-GO SYSTEM INCLUDES: 

□ 6 amp switching power supply □ Keyboard 

□ Display -Hex & Binary □ Pete Bug keyboard 
monitor □ Optional Macs Bug CRT monitor □ At- 
tractive cabinet □ Dual RS232 interface □ 32 bit 
parallel I/O □ Versabus compatibility □ The only 
system that provides for direct entry of 68000 
machine code. 

^ MML For information call (714) 566-3911 

f ml I Computer System Associates 

%]^IV 7562 Trade Street, San Diego, CA 92121 



$985.00 complete 




Minuses: The cataloging modules are slow, compared to 
competing disk catalogers, due to the extra information 
they collect. The package needs an expert mode that 
allows skilled users to avoid the constant query, ' 'Is this 
information correct?" 

Documentation: Six printed pages, well done, but sketchy. 

Skill Level Required: Beginners can use most of the 
package. However, only skilled users should use the edit op- 
tion of ZAP PET. 

Reviewer: James Strasma 



Product Name: Munch-a-bug 

Equip, req'd: Apple II Plus with 48K 

Price: $49.95 

Manufacturer: Southwestern Data Systems 

10159-1 Mission George Rd. 

Santee, California 92071 
Description: Munch-a-bug provides a variety of 
capabilities to aid in debugging assembly-language pro- 
grams. A few of these are: Trace, a facility for listing 6502 
registers as each instruction executes; Breakpoints, a 
facility to identify paths of execution; Examine, a facility 
allowing display and change of 6502 registers. There are 
many other features making the program a truly valuable 
utility. 

Pluses: Assembly-language programming is greatly eased 
with this product. Large or complex programs are done 
much faster if intelligent use is made of the product's 
features. A particularly valuable capability is the Next 
command which allows tracing but ignores JSRs. A feature 
for making three back-up copies is built in and works well. 

Minuses: A built-in assembler is provided, but it's 
somewhat primitive. Direct SAVEs of assembly source is 
impossible. This is, overall, a minor inconvenience,- it can 
be worked around. 

Documentation: Excellent. Some fairly original tech- 
niques are introduced, but the manual describes them 
clearly. There is, perhaps, a tendency towards making the 
examples provided overly simple. 

Skill level required: Experienced assembly-language 
programmer. 

Reviewer: Chris Williams 



Product Name: OS-96 

Equip, req'd: CBM 8032 with 8096 expansion 

memory board and Commodore disk 
Price: $200 

Manufacturer: A.B. Computers 

252 Bethlehem Pike 

Colmar, Pennsylvania 
Description: OS-96 is an extended BASIC interpreter. It 
expands BASIC workspace to an apparent 64K free (32K 
reserved for program text, and 32K for variables.) Also adds 
several commands and enhancements to BASIC, including 
most of those in the SM KIT programmer's aid. Further 
enhancements to the interpreter are planned later. 

Pluses: Leaves lots of memory space free for large pro- 
grams. Changing program lines, or chaining large modules 
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behind small ones, doesn't clear or overwrite variables. 
The BASIC stack has been lengthened, allowing deeper 
nesting of loops and subroutines. Key sequences access the 
8032's extended editing commands. Program lines and 
variable data may now be up to 255 bytes long. Spaces are 
automatically deleted from program lines, and reinserted 
on LISTing, with a further option moving each statement 
to a new line, properly indented for structure. OS-96 is fully 
compatible with PET BASIC syntax and programs. 

Minuses: Program load addresses differ from usual BASIC. 
Includes a "load at" command to help. The AUTO line 
number feature often turns on when not wanted. None of 
the usual SYS calls or enhancement ROMs work with 
OS-96. 

Documentation: The instructions I saw were preliminary. 
I found them adequate for those who already know PET 
BASIC, though they hint at undocumented commands. 

Skill level required: Beginner to expert. 

Reviewer: Tames Strasma 



Product Name 
Equip, req'd: 



The W1Z Database Manager 

CBM 8032 or 8096 computer with 
8050 disk drive. CBM or ASCII printer 
optional. Uses phantom ROM at 
$9000. 
Price: $495 

Manufacturer: Dr. Daley Software 
Water Street 
Darby, Montana 59329 
Description: WIZ is a data manager package. It is limited 
to a single file, but the file may use up to 30 diskettes, each 
with 2,000 or more records. Each record may be up to 250 
characters long, and contain up to 64 fields of up to 78 
characters each. 

Pluses: Handles vastly larger numbers of records than 
competing programs. Also includes built-in plotting. Like 
its best competitors, the WIZ uses CBM's recommended 
screen input editor, has programmable arithmetic, and 
handles simple reports. It also allows sorting on any field 
or combination of fields, and either fixed field or global 
searches, with or without regard to the case of the text. 
Results may be sent to screen, printer, or Word-Pro se- 
quential disk file. Includes listing to allow reading and 
writing its data from other programs, and can jump from 
itself to other user programs. Better yet, it can read in data 
from sequential disk files, avoiding retyping when up- 
grading from a lesser data package. 

Minuses: Moderate attempts are made to keep the user 
from halting, listing, or changing the programs. The phan- 
tom ROM will activate outside the WIZ, if its last two ad- 
dresses are PEEKed; whether this is a problem depends on 
what other ROM shares the socket. 

Documentation: Self-documenting. Includes a thick and 
nicely packaged manual, but you may not need it. The 
WIZ explains itself merely by typing "help". This works 
virtually anywhere in the program, providing a total of 125 
help screens. 

Skill level required: Even beginners should be able to use 
this package effectively. 

Reviewer: James Stiasma 



Product Name: Write Away 

Equip, req'd: Apple U or Apple U Plus, 48K, 1 disk 

drive. Recommend modified shift key, 
lower-case adapter, 80-column card, 
second disk drive. 
Price: $175.00 

Manufacturer: Midwest Software Assoc. 
P.O. Box 301 
St. Ann, MO 63074 
1-800-835-2246, Ext. 467 
Description: A versatile word processor providing tne user 
with a variety of levels of capability. Terminology and pro- 
cedures are quite similar to DEC's PDP word processing 
software. 

Pluses: The expandability is excellent. If one is familiar 
with DEC procedures, learning time is near zero. 

Minuses: Very little can be found wrong with this pro- 
gram. There is a lengthy tutorial on the program disk that, 
perhaps, takes longer than it should to complete. 

Documentation: Excellent. The booklet provided is con- 
cise and informative. A separate quick-reference card of 
commands is included in the package. Without it, the user 
would have to occasionally erase his screen of text in order 
to use the HELP command. 

Skill level: No programming language knowledge needed. 
Some general computer familiarity is desirable. 



Reviewer: Chris Williams 



(Continued) 



WINCHESTER 

FOR MOTOROLA 

EXORCISOR/MDOS 

D 10 MB Winchester hard disk runs MDOS on Motorola 
Exorcisor System □ No modification to MDOS required 
□ MDOS based software stays alive □ All user software 
operates without modification D Optional SA-801R flex- 
ible diskette drive system □ Optional 10 MB removable 
cartridge. 

M #■% For information call (714) 566-3911 

■ Kll Computer System Associates 

^^■™ 7562 Trade Street, San Diego, CA 92121 
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Product Name: Amper-Magic 

Equip, req'd: 32K Apple II or Apple II Plus; 

Applesoft in ROM or Language Card 

and one Disk II with DOS 3.3. 
Price: $75.00 

Manufacturer: Aurora Systems, Inc. 

2040 E. Washington Ave. 

Madison, WI 53704 
Author: Bob Nacon 

Description: A menu-driven utility program that allows 
machine-language subroutines to be added to Applesoft 
programs. Each subroutine is given a name (see below) and 
is callable from the BASIC program using the Applesoft 
Ampersand (&) command. Twenty- three ready- to-go sub- 
routines and their descriptions are included with the 
package. Volume II, with 26 routines, will be released by 
the time you read this. 

Pluses: Ampei-Magic provides a convenient way to 
package ampersand routines and Applesoft programs 
together. This allows the user to avoid extra BLOAD com- 
mands and possible adjustment of program pointers when 
setting up a program that uses ampersand subroutines. 
Many options are provided for ease of use. For example, 
any table of subroutines created for use by one program 
may be saved in a binary file and used as a unit in any other 
program desired. 

Minuses: The names given to the subroutines are 
restricted to four bytes. A byte may be either a single 
ASCII character or an Applesoft token name (e.g., GOTO, 
NEXT, PRINT, etc.). This restricts the user to un- 
mnemonic names if only ASCII characters are used. 

Documentation: Good. A quick reference card summarizes 
system usage. 

Skill level iequired: Facility with Applesoft. No knowl- 
edge of machine language is needed. 

Reviewer: Richard C. Vile, Jr. 



Product Name: 
Equip, req'd: 



Price: 
Distributor 



Apple Flasher 

Apple II with Applesoft in ROM or 
RAM card. One or more disk drives 
with DOS 3.3. 
$34.40 plus $1 for shipping 
Crow Ridge Associates, Inc. 
P.O. Box 90 

New Scotland, NY 12127 
(518) 765-3620 
Description: Apple Flasher provides a convenient, rapid 
way to find and display high-resolution pictures that have 
been previously stored on diskettes by other Apple II pro- 
grams. It loads the names of assumed picture files into the 
program and offers four options for their display: 1. A 
single keystroke to present picture; 2. Each picture scanned 
for about two seconds in rapid succession; 3. Picture files 
displayed in an emulation of a manual slide drum slide 
projector; 4. Automatic projector mode. Back-up replace- 
ment is available for $8.50 plus return of the damaged 
disk. One back-up copy will be sold in addition to the 
master disk for this price. 

Pluses: The author has developed a very fast file recovery 
algorithm that loads frames in about two seconds. You can 
also load three files at once with instantaneous shuttle to 
either hi-res screen one or two. Files may be on two drives 
and "punched up" in any sequence. 



Minuses: The program does not allow for reordering the 
presentation of the files differently from the order they are 
saved on the disk. The price of the program seems some- 
what high in view of its limited function. Without carry- 
ing out the task of entering the projection times in each 
image file, the auto-display function is of limited use. 

Reviewer: David P. Allen 



Product Name: Color Scribe 

Equip, req'd: TRS-80 Color Computer, 32K with 

disk. 
Price: $49.95 

Manufacturer: Computerware 

Box 668 

Encinitas, CA 92024 
Description: This full-featured text editor/formatter in- 
cludes full disk and cassette ASCII-file compatibiity. The 
text editor is line-oriented, and can be used to edit BASIC 
files, as well as many other text applications. The editor 
includes edit, change, add, copy, move, and replace. The 
formatter is very powerful and automatically justifies left 
and right text. Headers and footers are allowed, as is 
underlining and centering. Indentation and sending of 
printer control codes are accepted. User remarks can be 
entered into files, and files larger than memory are easy to 
create. 

Pluses: Easy to learn for simple applications, yet offers 
more powerful functions when required. The formatter is 
one of the best I have seen. The disk operating system 
works well now since bugs from an earlier version of the 
program have been corrected in this version. Files can be 
as large as a disk can hold by using the 'MORE' command. 
The READ command brings text from a file on disk into 
any desired position in the file in memory. Files are backed 
up automatically as they are loaded. A MACRO command 
allows the user to specify single-key entry of one or a series 
of commands. ESCape and CHR$ commands can be speci- 
fied by the formatter to allow you to use special print op- 
tions, change character fonts, etc., in the printer. Com- 
mands can be entered in either upper or lower case. 

Minuses: Since the program is line oriented, the user must 
press the ENTER key at least every 127 characters. Text is 
difficult to visualize on screen, and the screen print for- 
matter does not use a "window" format to view the text. 
As a result, you must do a printout to actually view the 
result of formatting commands. When working on a file 
brought in from disk, the file is open. If you shut off the 
computer, or exit Scribe via Reset, or other unauthorized 
means, you will have an open file on the disk. You will 
probably not be able to read this file again. It is possible to 
end up in BASIC if you press the BREAK key while access- 
ing the directory. The manual does warn of this. A minor 
bug does not allow using the slash bar as extension 
delimiter,- a period is used as delimiter. 

Documentation: The 40-page operation manual is of excel- 
lent quality. A demonstration file is included on the disk 
that assists in understanding the operation of the program. 

Skill level required: The progam operation is easy to learn, 
even for the novice operator. 

Reviewer: John Steiner 

»MCftO 
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Commodore Programs 
Move into the 
Fast Lane with 



PetSpeed — The Optimizing 
Basic Compiler that runs Commodore 
BASIC 40 times faster. You can 
dramatically reduce long processing 
times, tedious disk handling, and long 
print runs. No other compiler can 
offer the same speed, compatability 
and trouble-free compiling as 
Petspeed. 

Compatible — Petspeed 
compiles any BASIC application and is 
available for any combination of 
4000 and 8000 series Commodore 
equipment. 

Faster The key that sets Pet- 
speed apart from other compilers is 
optimization. Where most compilers 
merely translate from one language 
to another, Petspeed analyzes your 
source program to eliminate unnec- 
essary complexities, thus speeding 
processing time. Your program is 
reduced to much smaller components 
and reassembled into a far more effi- 
cient form. Compare these optimizing 
features: 

• 4-Pass compiler. 

• Automatically uses faster integer 
arithmetic when possible. 

• Automatically handles frequently 
occurring variables and arrays. 

• Subroutines no longer need be 
located at the beginning of your 
program. 

• Petspeed automatically calls all 
subroutines at maximum speed. 

• Petspeed runs twice as fast as 
other compilers. 

• Larger programs require far less 
memory when 
compiled. 



Easy tO Use Petspeed is as 
easy to use as these screen displays 
illustrate. 




Directory 

BEFORE 

compilation. 



Simply type in 

your program 

name. 




Security A security device is 
provided to run Petspeed, but no run- 
time key is necessary for compiled 
programs. You're free to build in 
your own protection. Petspeed code 
cannot be listed by others, so com- 
piled programs cannot be tampered 
with. Your programs belong entirely 
to you. 



Move your Commodore into the fast 
lane today with Petspeed. And save 
$25 too! Send this coupon today to 




Directory 

AFTEfl 

compilation 



It isn't necessary to add compiler 
directives. Simply type in the pro- 
gram name. In less than 2 minutes, 
you'll see your program run up to 
times faster. 



SMALL SYSTEMS ENGINEERING 

222 B View Street 

Mountain View, CA 94041 

(415) 964-8201 



Dealers: Ask for our free demo disk. 
Price $325 





Offer Expires 8/31/82 



Please ru9h Pet9peed today! My 
disk format is □ 8050 □ 4040. 
My computer is □ 8032 □ 4032. 



My check for $300 (plus 6'/2% sales tax 
for CA res.) is enclosed. 



D Please send more information □ I'm a dealer. Send me your 
free demo disk. 



Name 

Company 

Street 

City 



Mail to: Small Systems Engineering 

222 B. View St., Mountain View, CA 94041 
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TM 



Dr. William R. Dial 
438 Roslyn Avenue 
Akron, OH 44320 
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In the next few issues of this new publication serving 
the Atari micros, a complete memory map will be 
constructed giving the reserved memory locations in 
RAM and ROM with a description of the purpose of 
each location. The first 128 of page zero are reported 
in the current issue. 



6. PEEK(65) 3, No. 5 (May, 1982) 
Eidbo, Carl, "OS-65U Disassembly Aid," pg. 3-5. 

The unavailability of an OS-65U disassembly manual 
led to a project to disassemble specific areas. Both 
BASIC and machine-language versions of a dis- 
assembler are given for OSI micros. 



8. Mini'App'Les 5, No. 5 (May, 1982) 
Murrell, Mike, "Cursor Menu," pg. 9-10. 

A cursor-oriented menu control program for the 
Apple. Written in Applesoft. 

9. Call — A.P.P.L.E. 5, No. 5 (May, 1982) 

So, Edward C, "Picture Compression," pg. 21-35. 

A program in machine language for the Apple which 
provides a method of storing and retrieving an Apple 
hi-res picture in less than the 34 sectors it normally 
requires. The program consists of five separate 
routines. By examining for duplicated pixels within 
the picture, one can use less than 960 pixels to store 
the picture. 

10. Byte 7, No. 5 (May, 1982) 

Sweet, Jerry N., "Chedit," pg. 426-444. 

A graphics-character editor enabling the Apple Pascal 
user to define his own character set, using the Turtle- 
graphics system. 

Microcomputer Information Resources 

MICRO wants to make sure our readers are aware of the 
excellent sources of microcomputer bibliographic infor- 
mation that are available. 

• Microcomputer Index is a periodical that provides a 
subject index for a cross-section of popular microcom- 
puter magazines. It includes abstracts. Published by 
Microcomputer Information Services, 2646 El Camino 
Real #247, Santa Clara, CA 95051, Microcomputer In- 
dex has put more than 10,000 articles, indexed and 
abstracted from 23 periodicals, on line with 
Lockheed's DIALOG service. The Index is probably the 
best single source of bibliographic information in book 
form about articles published in microcomputer maga- 
zines. Compiled by W.H. Wallace and published by 
Missouri Indexing, Inc. (P.O. Box 301, St. Ann, MO 
63074), The Index is not only comprehensive, but so 
well organized that using it is a pleasure. 

• Micro ... Publications In Review is another helpful 
publication (Vogeler Publishing Inc., P.O. Box 489, 
Arlington Heights, IL 60006). This periodical repro- 
duces the tables of contents of the latest issues of the 
major microcomputer magazines, and provides a sub- 
ject index. JMCRO" 
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HANDS-ON LEARNING 

Presf ax® and Apple® II 







Young students, the handicapped and many others are finding the Apple® II 
computer more accessible than ever before. Thanks to the Presfax 100® Touch 
Teacher keypad from Computer Data Services. 

With a square, touch- sensitive area consisting of 100 "keys," the Presfax 100 key- 
pad fits right over the Apple II's keyboard, freeing users from any restrictions 
they may encounter with the standard keyboard arrangement. 

The keypad grid can be covered with overlays composed of whatever symbols 
the user feels most comfortable with — large alpha-numeric characters, braille, 
special symbols and pictures, etc. Grid values and coordinates are memory- 
stored and assigned individual audible pitches to ensure user feedback. 

Driver software comes on a 3.3 DOS disc complete with full instructions on how 
to incorporate it with the purchaser's own programs. Demonstration and educa- 
tional programs are also available. Contact Computer Data Services, P.O. Box 
696, Amherst, N. H. 03031 for full details. Or call (603) 673-7375. 



Suggested Retail Price $175.00 
Shipping 3.50 



Dealer Inquiries Invited 



COMPUTER DATA SERVICES 
PO Box 696 Route 122 
Amherst. NH 03031 
(603)673-7375 



V/k 
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Dr. William R. Dial 
438 Roslyn Avenue 
Akron, OH 44320 



6809 Bibliography 



64. BYTE 7, No. 5 (May, 1982) 

Kocher, Christopher P. and Keith, Michael, "Six Personal 

Computers from Japan," pg. 61-102. 
Descriptions in detail of six Japanese computers including 
the 6809-based Canon CX-1, the Hitachi MB-6890, and the 
Fujitsu FM-8. 

Barden, William, Jr., "Ports of Entry and Soft Breezes for the 

Color Computer and Model m," pg. 162-198. 
Instructional article for the Radio Shack 6809-based Color 
Computer. A $10 anemometer and other remote-sensing pro- 
jects using the cassette interface. 

65. MICRO No. 49 (June, 1982J 

Tripp, Robert M., "Editorial," pg.5. 
Discussion of new developments relating to the 6809 
microprocessor. 

Clements, William C, Jr., "Add a VIA and Speech Synthesizer 

to the Color Computer," pg. 19-21. 
Hardware article for the TRS-80 Color Computer, adding two 
user-accessible, 8-bit bidirectional I/O ports to your com- 
puter and interfacing an inexpensive speech synthesizer. 

Dial, William R., "Resource Update," pg. 99-100, 110. 
A list of magazines which contain information about the 
6502/6809 microprocessors on a reasonably regular basis. 

Staff, "Software Catalog," pg. 101-109. 

Description of some 50 different software items, including a 

number for 6809-based systems. 
Staff, "Hardware Catalog," pg. 111-113. 

Some 20-odd items of hardware are described including 

several for 6809 systems. 
Dial, William R., "6809 Bibliography," pg. 117. 

A number of literature references related to 6809-based 

systems. 

66. Apple Assembly Lines 2, Issue 9 (June, 1982J 

Sander-Cederlof, Bob, "Implementing New Opcodes Using 
'BRK'," pg. 2-5. 

How to use the 6502 to simulate neat instructions from the 

6809 like LEAX, BSR, BRA, etc. 

67. Microcomputing 6, No. 6, Issue 66 (June, 1982J 

Staff, "C Development Tools for the MC6809," pg. 162. 
An announcement of Introl-C, a set of software for 
6809-based C programs, including a C compiler, a 6809 
assembler, an object code linker, and an object code library 
manager. 

68. BYTE 7, No. 6 (June, 1982) 

Barden, William, Jr., "A General-Purpose I/O Board for the 

Color Computer," pg. 260-282. 
This hardware article describes a low-cost interface which 
can be plugged into the ROM slot of the Radio Shack TRS-80 
Color Computer. 

69. The Rainbow 1, No. 12 (June, 1982) 

Lewandowski, Dennis S., "The Assembly Corner," pg. 6-7. 
Discussion of indexed addressing for the Radio Shack TRS-80 
Color Computer, also designated the 80C or CoCo. Several 
other instructions for this micro are also discussed. 

Waclo, John, "80C Picks the National Football League," pg. 

12-18. 
Keep track of how the NFL is doing with this program for the 
TRS-80 Color Computer. 



Shorter, Ted, "Ice Lander Can Be A Slick Run," pg. 25-27. 
A lunar lander type of game for the 80C. 

Nolen, Bill, "Now a Whole Bag of Dice," pg. 38-40. 
How to replace your $5.00 set of dice with a $600 computer, 
with a few extras to boot. For the TRS-80 Color Computer. 

Curtis, H. Allen, "Getting More from PMODE 4," pg. 42-46. 
Discussion of color graphics on the 80C demonstrating that 
PMODE 4 has six other color sets. Several short programs are 
given. 

Scerbo, Fred B., Dobbert, Robert, and Haggerty, Dale, "Swamp 
Wars Can Win Your Croix de Lillypad," pg. 49-50. 

A color game for the TRS-80 Color Computer. 
Mir, Jorge, "A Data File to Store All Your Information," pg. 
57-62. 

A flexible file system for the Color Computer, with search 

function, sorting, etc. 
Moses, Ray, "Stars Fall on 80C," pg. 64-65. 

A program giving a display of the sky using a variety of times 

of the year. 

70. '68' Micro Journal 4 No. 5 (May, 1982) 

Anderson, Ronald W., "Flex Uer Notes," pg. 10-12. 

Discussion of the use of Pascal including a dump utility for 

6809 based systems. 
Nay, Robert L., "Color User Notes," pg. 13-14. 

Notes on the Super Color Writer and Flex9 for the Radio 

Shack 6809-based Color Computer. 
Cadmus, Ray, "OS-9 Notes," pg. 15-16. 

Notes on the OS-9 operating system for the 6809 including 

a program HDIR, a hiarchial directory. 
Rowley, Blair A., "Uniflex and RSTS," pg. 19-22. 

Intercommunication between Uniflex and RSTS developed 

in 6809 assembly language. 
Lilly, Randal, "Transfer" pg. 22-24. 

A computer link program that allows a main computer 

(SWTCP 6809) to transfer and run programs on a remote 

CPU [6800 or 6809 computer). 
Jones, Bob, "Othello," pg. 34-35. 

Othello for 6809 based systems. 
Preble, LaurenceD., "Error Messages," pg. 37. 

A patch for Version 17 of TSC's Extended BASIC for the 

6809 to better handle error messages. 
Liu, Bruce, "Overlay Systems," pg. 37-39. 

Improved Pascal routine for 6809 based systems. 

71. 80 Micro Issue No. 30 (June/July, 1982J 

Berenbon, Howard, "SDS80C Editor/ Assembler/Monitor" 

pg. 70-71. 

Review of a 6809 assembler/ editor/monitor. 

Commander, Jake, "Spiromania-Part n," pg. 106-115. 

Machine code routine for color graphics on 6809 based 
systems including the Radio Shack Color Computer. 

Norman, Scott L., "Color Computer Utilities," pg. 116-120. 
Power Pack and Color Diagnostics, Editor and Assembler 
for the Radio Shack Color Computer are reviewed. 

Leichtman, Kerry, "Bob Rosen — A Colorful Success Story," 

pg. 174-175. 

Build a better bulletin board and the world will beat a path 
to your door. Using the 6809-based Color Computer. 

Miller, Franklyn D., "Extended Color Basic," pg. 266-270. 
Discussion and hints for using this system for the Color 
Computer. AMCRO 
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Software Catalog 



Name: Financial Records 
Managei 

System: Apple n, DOS 3.3 
Memory: 48K 
Language: Applesoft and 

Machine 
Hardware: Disk drive Iprinter 

optional] 
Description: A menu-driven, 
user-friendly program to col- 
lect, sort, store, and analyze up 
to 750 checking/budget 
records and 500 tax records. In- 
cludes 30 user-defined budget 
categories and 50 user-defined 
tax categories, automatic pay- 
ments, search and edit func- 
tions, average and percentage 
budget analysis, tax summary 
(including approximate taxes 
due), "What if?" analysis, and 
utilities. 
Price: $44.95 

Includes typeset manual, 

program disk |copyable). 
Author: D.M. Whittaker 
Available: 

Cybertech 

1500 W. Shaw, Suite 404 

Fresno, CA 93711 

(209) 222-9094 



Name: How to Operate 

the Apple II Plus 

System: Apple II Plus 
Hardware: One disk drive, 
standard audio 
cassette player 
Description: An audio cassette 
mini-course for the first-time 
computer user. Three audio 
cassettes and Apple's own 
DOS 3.3 System Master disk- 
ette are used to teach the 
essentials of computer opera- 
tion: how to run programs, 
enter data, save and organize 
files, make backup copies, 
modify programs, and much 
more. No programming or 
technical knowledge assumed. 
Price: $49.95 

Includes three spoken-voice 

cassettes with 28-page 

Operator's Guide in a vinyl 

binder. 
Author: Howard Manthei and 

Lee McFadden 
Available: 

Fliptrack Training Tapes 

A Division of Mosaic Media 

P.O. Box 711 

Glen Ellyn, IL 60137 

1312) 790-1117 



Name: Bowling Data 
System Z.O 

System; Apple II 
Memory: 48K minimum 
Language: Applesoft ROM 
Hardware: 1 disk drive |2 

recommended), 

DOS 3.3, 

80-column printer 
Description: A database pro- 
gram for bowling league 
secretaries. Stores and com- 
putes data for multiple [and/or 
mixed) leagues of up to 40 
teams, each with up to six 
bowlers per team (not in- 
cluding substitutes). The 
reports generated are: weekly 
recap, score sheet, season 
average, and team listing. 
Many options are included. For 
each team a cumulative record 
is kept of all pertinent data. 

Price: $149.95 

Includes documentation, one 

diskette. 
Author: Arnold Hooton, 

Published by Rainbow 

Computing, Inc. 
Available: 

RCI Marketing 

19517 Business Center Dr. 

Northridge, CA 91324 

(213) 349-0300 

Name: The UCSD 
p-System™ 

System: The UCSD 

p-System 
Memory: 48Kb runtime 
environment; 
64Kb development 
environment. 
Language: Written m UCSD 
Pascal and 
Assembly 
Support: UCSD 
Pascal, 

FORTRAN-77, 
BASIC, and 
Asscinb lv 
Hardware: 8086, Z80, 8080, 
8085, 6502, 9900, 
LSI-ll/PDP-11, 
and 68000 
Description: The UCSD p-Sys- 
tem is a stand-alone operating 
system for most microcom- 
puters based on the 8086, 
8080, Z80, 6502, 6809, 9900, 
68000, and LSI-ll/PDP-11 
microprocessors. The UCSD 
p-System includes an operating 
system, file handler, screen- 
oriented editor, line-oriented 



editor, macro assembler, inter- 
preter, and utilities. 
Price: $375.00 
Includes object code for the 
UCSD p-System, UCSD 
p-System User Manual, 
Architecture Guide, 
Installation Guide, and 
Beginner's Guide to the 
UCSD Pascal System, with 
tutorial disk. 
Available: 
SofTech Microsystems, Inc. 
9494 Black Mountain Rd. 
San Diego, CA 92126 
(714) 578-6105 



Name: Waterloo 

microFORTRAN 

System: Commodore 

SuperPET, Volker- 
Craig 2900, 3900, 
4900, Northern 
Digital microWAT 
Description: WaterJoo micio- 
FORTRAN is a special dialect 
designed for teaching pur- 
poses. It has many of the 
characteristics and much of 
the flavour of normal FOR- 
TRAN, but varies significantly 
from established standards for 
that language. This language 
processor has many of the im- 
portant characteristics of the 
WATFIV-S compiler which is 
widely used on IBM com- 
puters, plus some features 
from the new FORTRAN-77 
definition. Examples of lan- 
guage features supported are 
FORMAT, subroutines and 
functions, multi-dimensional 
arrays, extended character- 
string manipulation, struc- 
tured programming control, 
and file input/ output. In addi- 
tion, the interpreter provides a 
powerful interactive debugging 
facility. 
Available: 
Waterloo Computing 
Systems Limited 
158 University Ave. West 
Waterloo, Ontario 
Canada N2L 3E9 



Name: Storm 

System: Radio Shack Color 

Computer 
Memory: 16K 
Language: Assembly Language 
Hardware: Joysticks 
Description: Storm brings the 



excitement of the arcade to 
your home. A tempest of a 
game, it has 135 levels of play, 
fast action, graphics, and 
sound. It challenges the very 
best arcade experts and offers 
fun for the beginners too. 
There is no other high- 
resolution graphics arcade 
game like it! 
Price: $24.95 on cassette 

$29.95 on disk 

Includes program and 

instruction manual 
Available: 

Computerware 

Box 668 

Encinitas, CA 92024 

(714) 436-3512 



Name: FORTH-79 

Version 2 

System: Apple II or Apple 
n Plus (also Z-80 
CP/M, NorthStar 
Advantage, and 
NorthStar DOS 
Memory: 48K 
Language:- Machine Language 

and FORTH-79 
Hardware: 1-14 disk drives 
(13- or 16-sector- 
compatible) 
Description: FORTH-79 (Vei. 
2) is a structured language 
suited for systems and applica- 
tions programming where ex- 
ecution speed is important. It 
meets all provisions of the 
FORTH-79. Standard and pro- 
grams are portable, faster than 
BASIC, and provide an interac- 
tive environment. Its high- 
speed compiled code is well 
suited for real-time applica- 
tions. Includes screen editor, 
macro-assembler, strings, 
32-bit integer arithmetic. 
Floating point and hi-res Tur- 
tle Graphics are also available. 
Price: $99.95 - BASIC 

$139.95 - hi-res and floating 

point 

Includes software and 

200-page manual (including 

FORTH-79 and fig-FORTH). 
Author: Martin Tracy and 

Philip Wasson 
Available: 

MicroMotion 

12077 Wilshire Blvd. 

Los Angeles, CA 90025 

(213) 821-4340 (continued) 



No. 52 - September 1982 



MICRO - The 6502/6809 Journal 



111 



Software Catalog (continued) 



Name: 



System: 
Memory: 



Language: 
Hardware: 



BASIC 
Compiler™ 

The UCSD 
p-System 
48Kb runtime 
environment; 
64Kb development 
environment 
BASIC 

8086, Z80, 8080, 
8085, 6502, 9900, 
6809, 68000, LSI- 
11 /PDP-11 
Description: The BASIC Com- 
piler is a powerful and flexible 
BASIC offering you: expanded 
syntax, including IF THEN 
ELSE construct; INCLUDE 
files; and virtual arrays. The 
BASIC Compiler is fully in- 
tegrated and compatible with 
UCSD PascalTM an< j 
FORTRAN-77. 
Price: $225.00 
Includes object code for the 
BASIC Compiler and BASIC 
Reference Manual. 

Available: 
SofTech Microsystems, Inc. 
9494 Black Mountain Rd. 
San Diego, CA 92126 

(714) 578-6105 



Name : Cash + Plus 
System: Apple II Plus with 

DOS 3.3 
Memory: 48K 
Language: Applesoft BASIC 
Description: Point-of-sale pro- 
gram with inventory controller 
and management reporter. Can 
also be used with optional cash 
drawer. 
Price: $395.00 

Includes programs and 

manual. 
Author: Lynn Graybiel 
Available: 

Southeast Computer 
Concepts Corp. 

500 E. Spanish River Blvd. 

Boca Raton, FL 33431 



Name: Bond Yielder 

System: Apple II Plus 
Memory: 48K 
Language: Applesoft 
Hardware: Disk drive, 

optional printer 
Description: Bond Yielder per- 
forms fast and accurate calcu- 
lations on the profitability of 
fixed income investments. 
This package can replace the 



$1200 desk- top calculator now 

standard in the investment 

industry. 

Price: $149.95 

Author: Donald Brown 

Available: 
CE Software 
801 73rd Street 
Des Moines, IA 50312 

Name: TRA/C1 
System: OSI Superboard II, 

C1P 
Memory: 4K or more 
Language: BASIC and 6502 

ASM 
Hardware: Cassette tape 
Description: TRA/C1 single 
steps and traces machine-code 
programs and displays all 
registers, processor status, 
stack pointer, program 
counter, instruction and oper- 
and. Does not disturb any 
registers or the stack. This pro- 
gram is an essential aid to OSI 
machine-code or asssembly- 
code writers. 
Price: $17.95 

Includes casette tape and 

instructions. 
Available: 

D. Wolf, Ph.D. 

Box 565 

Port Hueneme, CA 93041 



System: 

Memory: 

Language: 
Hardware: 



Name: Universal Mailing 
List 

Any Commodore 
6502 or 64 
3.5 (Vic 20) - 
96K on the CBM 
BASIC 

Disk drive or tape 
drive 
Description: The program 
allows you to change, view and 
update addresses. It allows you 
to print one or all addresses 
onto mailing labels. It will 
build a list and save it onto a 
cassette tape for recall. The 
program is designed for the 
VIC 20, but it runs on the 
4016, 4032 and the 8032. 
Capacity ranges from 21 ad- 
dresses on 3.5k to 359 ad- 
dresses on 32k. 
Price: $29.95 
Includes 3 ring binder, 
users' manual and a cassette 
page that holds six cassettes 
for the program and data 
^iles. 

Author: S. Mark Vanderbilt 
Available: 
Computer Barn 
Old Town Salinas 
319 Main Street #2 
Salinas, CA 93901 
(408) 757-0788 

(Continued) 



CSE means OSI 

Custom After Market Software 
for C1P and C4P machines 



'Basic Enhancer: 

Renumber, Auto Sequencer, Screen Control func- 
tions, and tape 1/0 system that is faster and has file 
names 

C1P $21.95 

C4P $29.95 

Modified Monitor Rom Chip: 

Now get indirect jump-capabilities just like those 
in the C1P and for no extra charge CSE will burn in 
your machines serial number $16.95 

*NOTE: The C4P version of the Basic Enhancer in- 
cludes the modified monitor Rom chip required for 
proper program functioning. 

This is only a partial listing of our products. Write us 
for information on new disk programs or send $2 for 
catalog. Please include $2.00 shipping and handling 
with orders. 



Computer 

Science 

Engineering 



Box 50 • 291 Huntington Ave. Boston 02115 



.Decision 
Dystonia 



Decision Systems 

P.O. Box 13006 
Denton. TX 76203 



SOFTWARE FOR THE APPLE II* 

ISAM-OS is an integrated set of Applesoft routines that gives indexed file capabilities 
to your BASIC programs. Retrieve by key, partial key or sequentially. Space from 
deleted records is automatically reused. Capabilities and performance thai match 
products costing twice as much. 
*50 Disk. Applesoft. 

PBASIC-DS is a sophisticated preprocessor for structured BASIC. Use advanced 
logic constructs such as IF. ..ELSE..., CASE, SELECT, and many more. Develop 
programs for Integer or Applesoft. Enjoy the power of structured logic at a fraction of 
the cost of PASCAL. 
•36. Disk, Applesoft (48K, ROM or Language Card) 

OSA — DS is a dis-assembler tor 6502 code. Now you can easily dis-assemble any 
machine language program for the Apple and use the dis-assembled cod*, directly as 
input to your assembler. Dis-assembles instructions' and data. Produces cod£ com- 
patible with the S-C Assembler (version 4 0), Apple's Toolkit assembler and others 
•25 Disk. Applesoft (32K, ROM or Language Card) 

FORM-OS is a complete system for the definition of input and Output froms. FORM 
OS supplies the automatic checking of numeric input for acceptable range of values, 
automatic formatting of numeric output, and many more features 
•25 Disk, Applesoft (32K. ROM or Language Card! 

UTIL-DS is a set of routines for use with Applesoft to format numeric output, selec 
lively clear variables (Applesoft's CLEAR gets everything!, improve error handling, 
and interface machine language with Applesoft programs. Incluoes a special load 
routine for placing machine language routines underneath Applesoft programs. 
•25 Disk, Applesoft 

SPEED-DS is a routine to modify the statement linkage m an Applesoft program to 
Speed its execution improvements of 5-20% are common. As a bonus. SPEEO-OS 
includes machine language routines to speed string handling and reduce the need fc 
garbage clean-up. Author LeeMeador. 
•15 Disk, Applesoft (32K. ROM or Language Card) 



I Add M. 00 for Foreign Maill 
"Apple II is a registered trademark of the Apple Computer Co 
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(continued) 



Name: S of term 

System: Apple II or Apple 

HPlus 
Memory: 48K, Autostart 

ROM 
Language: Assembly - 6502 
Hardware: Serial 

communications, 

optional 

80-column video, 

optional printer 
Description: High-speed CRT 
emulator up to 9600 baud for 
following terminals: IBM 3101 
series, DEC VT-100 and 
VT-52, Data General D-200, 
ADDS Regent Series, Lear 
Siegler ADM-3A and ADM-5, 
Hazeltine 1400 and 1500 
series, TeleVideo 900 series. 
Also includes file transfer with 
data compression, keyboard 
macros, automatic dialer with 
built-in phone book, local con- 
nect or remote operation using 
standard modems. 
Price: $150.00 
Includes progam diskette, 
configuration diskette, 
manual. 
Available: 
Softronics 

6626 Prince Edward Place 
Memphis, TN 38119 
(901) 755-5006 



Name: FLEX - OS9 Copy 

Utility Program 

Description: Metacopy 130 is a 
file-copy utility that transfers 
any type of OS9 file to a FLEX 
sequential file, or FLEX se- 
quential files to an OS9 file. 
This utility also provides a 
directory of FLEX disk while in 
the OS9 operating system. The 
program is menu driven for 
ease of use. 
Price: $135.00 
Available: 

Meta Lab 

P.O. Box 1559 

Suite 106 

2888 Bluff St. 

Boulder, CO 80301 

(3031 499-4236 



Name: Mojave Desert 

Adventure 

System: VIC-20 
Memory: 3.5K 
Language: BASIC 
Hardware: Cassette, joystick 

(optional) 
Description: Explore the Mo- 
jave Desert in search for gold. 
You find gold but trouble finds 
you. Crunched and randomized 
programming makes this treas- 
ure hunt last hours. Game is 
over when you find all the gold 



or die of thirst. Random place- 
ment of key objects makes this 
a new adventure each time 
played. 
Price: $9.95 

Includes cassette tape, 

instructions. 
Author: Dennis McCormack 
Available: 

The Byte House 

Box 981 

Salem, NH 03079 



Name: Roteim 

System: OSI Superboard n, 

C1P 
Memory: 8K 
Language: BASIC and 6502 

Assembly 
Hardware: Modem 
Description: Roteim turns the 
computer into a high perfor- 
mance cipher terminal with 
special enhancements for con- 
venient encryption and decryp- 
tion of electronic mail. Roteim 
emulates a classic rotor cipher 
machine and can operate at 
continuous data rates of 300 
baud. Roteim is also available 
specially configured for 
Cegmon users or users of the 
new model Superboard. 
Available: 

D. Wolf Ph.D. 

Box 565 

Port Hueneme, CA 93041 



Name: CW Morse 

System: Atari 400 or 800 

VIC-20 Computers 
Memory: 16K - Atari 

5K VIC (expansion 

memory optional) 
Hardware: Two transistor, 1 

IC interface 
Description: CW Moise allows 
your computer to become a 
Morse terminal for an amateur 
radio station. It is capable of 
sending and receiving Morse 
code at speeds of up to 25 
wpm. Includes multiple 255 
character message buffers, 
special function keys, type- 
ahead keyboard buffer, and 
automatic speed control on 
receive. Package includes doc- 
umentation, interface sche- 
matic, and I/O connector. 
Send SASE and type of com- 
puter for more information on 
this and other software 
available. 
Price: $19.95 
Includes cassette. 
Available: 
Kinetic Designs 
401 Monument Rd. #171 
Jacksonville, FL 32211 



TIRED OF TYPING? 

MICRO has the solution. 

Order a diskette of three recent utility pro- 
grams for the Apple. For only $10.00, plus 
$2.00 shipping and handling, you will receive a 
DOS 3.3 diskette containing the source and 
assembled listings of: 

Applesoft Variable Dump by Philippe Francois 
(MICRO, April 1982) 

Straightforward Garbage Collection for the 
Apple by Cornelis Bongers [MICRO, August 
1982) 

COMPRESS by Barton Bauers (this issue, page 89) 

Please send check, money order, or VISA or 
MasterCard number. Only prepaid orders accepted. 

If you missed April or August, order one now! 
Include $2.50 for each issue. 

Send orders to: 

Apple Utility Disk 

MICRO 

P.O. Box 6502 

Chelmsford, MA 01824 



Name: High-Resolution 
Plotting Routine 

System: VIC 20 
Memory: 2K 
Language: BASIC 
Hardware: 1515 printer, tape 

player 
Description: This routine 
turns the VIC 1515 printer into 
a plotter with the highest 
possible resolution (72 
dots/inch horizontally and 
vertically). Will plot the 
results of user-supplied pro- 
grams, functions, or data log- 
ging routines. Size of the plot 
and automatic scaling with 
number labels and tic marks 
are continuously user- 
adjustable. Length of the plot 
may be infinite, allowing strip 
chart recording. 

Price: $10.00 

Includes cassette and 

instructions 
Author: Tim Bowker 
Available: 

Scientific Software 

525 Lohnes Dr. 

Fairbom, OH 45324 



Name: Legend Slide 
Select 

System: Apple II 
Memory: 48K 
Language: Assembly 
Hardware: Legend 64K or 
128KDE Card 
Description: Legend Slide 
Select offers a way to control 
the display of hi-res pictures. 
The program permits the Ap- 
ple II to act as a slide projector, 
and allows the user to flip for- 
ward or backward. Control of 
the displayed pictures is user- 
selectable and can be controlled 
from the keyboard, game pad- 
dles, or set to run automatically. 
Price: Free with card 

($349 retail) 

Includes program and 

manual. 
Available: 

Legend Industries 

2220 Scott Lake Road 

Pontiac, MI 48054 

(313) 674-0953 
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Name: Access 
System: Apple II Plus 
Memory: 48K 
Language: Applesoft, 

Machine Code 
Description: Access is a 
general-purpose database 
manager. Special features in- 
clude: word processor-style 
editor [delete/insert charac- 
ters, etc.); free format screen 
design; supports most 40- or 
80-column upper- and lower- 
case hardware modifications; 
record retrieval time by index 
less than three seconds and 
using any search parameters 
less than 23 seconds; up to 
1521 characters per record; up 
to 39 fields per record; up to 39 
characters per field; up to 20 
calculated fields per record; 
short forms option, and much, 
much more. 
Price: $320.00 

Includes manual, two disks. 
Author: Nik Spicer and 

Mike Slaughter 
Available: 

Spider Software Ltd. 

98 Avondale Road 

South Croydon 

Surrey, England 

Tel. 01-680 0267 



Name: SBCS AGRI- 

LEDGER 

System: Apple II or Apple 

II + , DOS 3.3 
Memory: 48K 
Language: Applesoft 
Hardware: 2 disk drives, 80 

column printer 
Description: Organize farm 
financial records with the 
SBCS Agri-Ledger! It is Menu 
driven, a user oriented pro- 
gram with clear, easy to follow 
documentation. Numerous 
reports, budgeting, large flexi- 
ble chart of accounts, yearly 
history, enterprise analysis, 
current market valuation can 
be done. Warranty, free pro- 
gram updates, and friendly 
customer service are provided. 
Price: $395.00 

Includes program disk, 

program backup, data disk 

and documentation. Demo 

available for $30. 

Author: David McFarling 

Available: 

Small Business Computer 

Systems 

4140 Greenwood 

Lincoln, NE 68504 

(402) 467-1878 



Name: Strobe Business 
Graphics 

System: Apple DOS 3.3 

CBM DOS 
Language: BASIC 
Hardware: Apple II, Apple HI, 
or CBM/PET with 
Strobe 100 Plotter 
Description: Stiobe Business 
Graphics provides excellent 
high-resolution j.002"J graph- 
ics for business and scientific 
applications. Cost of plotter, 
interface, and software is ap- 
proximately $1000. 
Price: $145.00 

for software only 

Includes line, bar, and pie 

chart routines [menu driven) 

and alphanumerics. 
Available: 

Strobe, Inc. 

897 Independence Ave. 

Bldg. 5A 

Mountain View, CA 94043 



Name: Specsystem 

System: Apple II & Apple 

HPlus 
Memory: 48K 
Language: Integer BASIC or 
Applesoft BASIC 
Hardware: Specsystem disk 
for use in 
conjunction with 
the Eventide 
A1B232 real-time 
audio spectrum 
analyzer 
Description: Specsystem is tor 
use with the Eventide A1B232 
RTA and allows you to perform 
3-dimensional spectral 
analysis and analyze reverb 
decay (RT-60|. In addition, the 
new hi-res 31-band real-time 
analysis display yields far 
greater resolution and more 
dynamic range options than 
previously available. Variable 
period averaging and range 
switching are available along 
with other new functions. 

Price: $199.00 

Includes Specsystem disk 

and complete instruction 

manual. 
Author: Eventide 
Available: 

Eventide, Inc. 

265 West 54 Street 

New York, NY 10019 

(212) 581-9290 



Name: 

System: 

Memory: 



GL-PLUS 

Apple IK 
128K 



Language: Business BASIC 
Hardware: 132-column 

printer and either 
second diskette 
drive or hard 
drive. 
Description: GL-PLUS is an 
extremely flexible and easy to 
operate general ledger with 
built in receivables and 
payables. Reports include 
general ledger, month's jour- 
nal, balance sheet, income 
statement, aged receivables 
and payables, receivable and 
payable detail, and more! 
Price: $495.00 
Includes operator's manual, 
programs, and sample 
company data. 

Author: Dan Sargent 

Available: 
Great Divide Software 
8060 W. Woodard Dr. 
Lakewood, CO 80227 



Name: Astioids 
System: VIC 20 or TRS-80 

Color Computer 
Memory: 5K (VIC), 4K 

(TRS-80) 
Language: BASIC 
Hardware: Cassette 
Description: This program is 
an arcade-style "dodge-the- 
asteroids" game for children 
7-13 years old. 
Price: $6.65 - U.S. 

$7.90 -Canada 

Includes program on tape, 

shipping. 
Author: Peter and Mike 

fames, Colin Helsby 
Available: 

MFT Electro-Enterprises 

P.O. Box 13076 

Kanata, Ont. 

K2K 1X3 

(613) 592-2962 (Canada) 



Name: Snack Attack 

System: Apple II Plus 
Memory: 48K 
Language: Apple Machine 

Language 
Hardware: Disk Drive 
Description: An a-mazing 
three-maze game that's more 
habit forming than eating 
peanuts. Anyone who can play 
just one game deserves a medal 
for super self-control. You feel 
a Snack Attack coming on — 
your only hope is to gobble up 
as many gumdrops as you can 
grab away from the greedy 
Gumdrop Guards! Our best 
seller for months; one try and 
you're hooked. Happy Snacking! 

Price: $29.95 
Author: Dan Illowsky 



Available: 
Datamost, Inc. 
9748 Cozy croft Avenue 
Chatsworth, CA 91311 
(213) 709-1202 
or your local computer store 



Name: Hockey 

System: Atari 400/800 
Memory: 16K RAM 
Language: Assembler 
(Machine) 
Hardware: Two, three, or 
four joysticks, 
cassette recorder 
or disk drive 
Description: Hockey is a high- 
speed video action game for 
two, three, or four players. It is 
played on an enclosed rink, 
with scoreboard including 
clock overhead. Game players 
use joysticks to control the ac- 
tion. Offensive players skate 
with the puck, pass, and shoot. 
Defensive players steal the 
puck and intercept passes. 
Goalies block shots. Hockey 
includes "smart" players who 
perform automatically. 
Price: $29.95 
Available: 

Gamma Software 
P.O. Box 25625 

Los Angeles, CA 90025 

(213) 473-7441 



Name: Adventure to 
Atlantis 

System: Apple II 
Memory: 48K 
Language: Machine Code 
Hardware: One disk drive 
Description: This game com- 
bines the best features of 
adventure games, arcade 
games, and fantasy role- 
playing games. Adventure to 
Atlantis is a sequel to Odyssey: 
The Complete Adventure. The 
straggle between the forces of 
magic (The High One) versus 
the forces of science (The 
Atlanteans) continues. The 
game uses four methods to 
grab the player's attention: 
high-resolution color graphics 
and animation, sound effects 
to enhance the action, random 
events at all stages of the 
adventure, and embedded 
arcade-like action. 

Price: $40.00 
Includes one floppy disk. 

Author: Robert C. Clardy 

Available: 

Synergistic Software 

830 N. Riverside Drive 

Suite 201 

Renton, WA 98055 

(Continued) 
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Name: Nightmare Gallery 

System: Apple II 
Memory. 48K 
Language: Machine code 
Hardware: Disk Drive 

(paddles/joystick 

optional) 
Description: This new fast- ac- 
tion game for the Apple Com- 
puter combines sound effects 
and high-speed arcade action 
into one challenging computer 
game. Players of Nightmare 
Gallery are trapped in a spooky 
graveyard with only a revolver 
to protect themselves against 
werewolves, ghouls, ghosts, 
vampire bats, and mummies. 
Firing a stream of silver 
bullets, players dodge around 
the graveyard. Points are 
awarded for hitting the super- 
natural terrors. A scoreboard is 
built into the game. 
Price: $34.95 

Includes one floppy disk. 
Author: Ron Aldrich 

Available: 
Synergistic Software 
830 N. Riverside Drive, 
Suite 201 
Renton, Washington 98055 



Name: Choplifter 

System: Apple II 

Apple II Plus 
Memory: 48K 
Language: Assembly 
Hardware: Joystick with two 

buttons 
Description: With a mission to 
rescue hostages from behind 
enemy lines, Apple owners can 
now take control of a heli- 
copter in this new arcade-style 
game. With realistic throttle 
action, players can maneuver 
their helicopter (in high 
resolution and simulated 3-D) 
through a sky of enemy jet 
fighters and air mines. Once 
you have successfully landed 
your chopper, hostages will 
run toward you through a bar- 
rage of tank fire and air-to- 
ground missiles while you 
frantically try to hold off the 
enemy. Each flight back to 
safety is especially nerve rack- 
ing, as a full load of hostages 
will perish if you go down! 
Price: $34.95 

Includes software package. 
Author: Dan Gorlin 
Available: 

Broderbund Software 

1938 Fourth Street 

San Rafael, CA 94901 

(415) 456-6424 

or dealers and distributors 



Name: Staiship 

Chameleon 

System: TRS-80 Color 

Computer 
Memory: 16K 
Language: Assembly 
Hardware: Cassette or disk 
Description: In this graphics 
arcade game, you are the Star- 
ship Chameleon, a special in- 
tergalaxian vessel with the 
assignment of protecting the 
planet below from the aerial 
attack of enemy invaders. You 
have the unique capability to 
change color at the push of a 
button in order to destroy the 
on-coming super bombs and 
anti-matter bombs that have 
been launched by the enemy 
Gabolatoks above. But watch 
out for the semi-intelligent 
aerial bombs! They home in on 
your every move, seeking to 
destroy you! Staiship Chame- 
leon has nine levels. 
Price: $24.95 - cassette 

$29.95 - disk 

Includes cassette or disk and 

instructions. 
Author: Kenneth Kalish 
Available: 

Computerware 

P.O. Box 668 

4403 Manchester Ave. 

Encinitas, CA 92024 

(714) 436-3512 



Name: MIMIC Speech 
Processors 

System: Apple II Plus 
Description: Low-cost speech 
I/O. Based on newly patented 
technique for digital recording 
and reproduction of voice 
signals. 

Price: $199.00 for plug-in 
hardware. 

$34.95 for MIMTALK 

software (prepares user 

vocabulary). 

Available: 
MIMIC, Inc. 
P.O. Box 921 
Acton, MA 01720 

Name: Audex 

System: Apple II (with 16K 
RAM Card) or 
Apple II Plus 
Memory: 48K 
Language: Applesoft 
Hardware: Optional tape 

recorder 
Description: Audex is a collec- 
tion of utility programs that 
allows you to create sounds, 
edit them, and play them back 
from your own BASIC or 
assembly-language programs. 
(Continued) 
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Computer Stop 16K 

Ram Board 

$79.95 

This high quality 16K Ram 
board acts like a Language 
Card when plugged into slot 
of your APPLE II. Compat- 
ible with Basic, DOS 3.3, 
CP/M, PASCAL, LISA 2.5, 
and VISICALC. With this card 
you get high quality, low 
price, compatibility, and a 1 
Year Manufacturer Warranty 
all for $79.95. 

LAZER Lower Case 

+Plus III 

$34.95 

The best lower case adapt- 
er available for the APPLE II. 
This feature packed board 
has twice the features of 
competing boards. The 
Lazer Lower Case +Plus III 
is the only lower case adapt- 
er that works with VISICALC 
and is recommended by 
Stoneware for OB MASTER. 
The Lower Case Plus III is 
expandable to 4 character 
sets (2 on board), has inverse 
lower case, includes ASCII 
and Graphics, and is compat- 
ible with most word proces- 
sors. NOTE: For REV. 6 and 
earlier order Lower Case 
+ Plus at $44.95. 

LAZER Keyboard 
■f-Plus 
$69.95 

The Lazer Microsystems 

Keyboard 4 Plus has a 64 

character type ahead buffer. 

The buffer can be cleared or 

ORDERING IN 



disabled. The Keyboard 
+ Plus lets you use the shift- 
key as a typewriter shift-key, 
allowing you to enter directly 
the 1 28 ASCII character set 
from the APPLE keyboard. 
The Keyboard +Plus may be 
installed on any APPLE II. 

Computer Stop 

Omnivision 

$129.95 

Looking for an 80-column 
card? Look no further! Now 
all your Basic, CP/M, and 
Pascal programs can take 
advantage of a full 80- 
column display. 

Wizard-BPO 

(Buffered Printer Interface) 
$139.95 

This outstanding parallel 
interface card comes with 
16KofRam installed, ex- 
pandable to 32K This card 
also has Graftrax-like fea- 
tures. So now you no longer 
need to wait to use your 
APPLE 1 1 while your printer is 
busy. Compatible with Basic, 
CP/M, Pascal. 

Microtek Parallel 

Printer Interface 

$59.95 

This popular printer inter- 
face card, manufactured by 
Microtek, is a steal at $59.95. 
The printer card comes com- 
plete with a cable and a Cen- 
tronics compatible con- 
nector (Ampheno!). Works 
with basic, CP/M, and Pascal. 
This card also has graphics 
capabilities. 
FORMATION 



We accept: VISA/MASTERCARD (include card #, ex- 
piration date, and signature), Cashier or Certified Checks, 
Money Orders, or Personnal Checks (please allow 10 
business days to clear). We also accept COD's (please 
include $2.00 COD charge). 

Please add 3% for shipping and handling (minimum 
$2.00). Foreign orders please add 10% for shipping and 
handling (minimum $10.00). 

California residents add 6% sales tax. All equipment is 
subject to price change and availability without notice. All 
equipment is new and complete with manufacturer's war- 
ranty. 

(714)735-2250 
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Price: $29.95 

Includes instructions. 
Author: Pete Kosel 
Available: 

Sirius Software 

10364 Rockingham Drive 

Sacramento, CA 95827 

(916) 366-1195 



Name: Hi-Res Ultra 

Plotter Package 
MP-10 

System: Any PET/CBM 

Series 2001, 3000, 
4000, 8000 
Computer 
(specify) 
Memory. 16K minimum 
Language: BASIC Original, 
Upgrade, or 4.0 
Hardware: Any Commodore 
graphics printer 
w / programmable 
line spacing 
Description: This is a beautiful 
plotting package that takes ad- 
vantage of the screen graphics 
and printer's ultra-high resolu- 
tion graphics. Equations must 
be entered in BASIC. Domain 
and/or range may be re- 
stricted, magnified, and man- 
ipulated. Printer graphing may 
be very small to full page and 
longer having a resolution of 
420 by an infinite number of 
dots lengthwise. Multiple 
equations can also be plotted. 
Excellent for lab or school. 
Price: $12.95 cassette 
$16.95 on 4040/2031 disk 
Includes full instructions 
and step-by-step guiding 
through program. 
Author: Louis F. Roehrs 
Available: 
TELE-TREX Software 
Systems 
4 Waring Lane 
Littleton, CO 80121 



Name: Firebug 

System: Apple 
Memory: 48K 
Language: Applesoft ROM 
Hardware: Disk drive (dual 

DOS 3.2/3.3) 
Description: Guide your me- 
chanical Firebug through a 
five-level maze using your Ap- 
ple keyboard or joystick, to the 
exit on Level 1. Your Firebug 
must race against time and fire 
to escape. A fuse is burning 
behind your Firebug, so your 
time is short! Add points for 
destroying the maze as you 
guide the Firebug through it. 



Fantasy effects include screen 
graphics of gas cans exploding 
in color, the sound of fire 
crackling, and the tic-toe of 
time running out. 
Price: $24.95 
Author: Silas S. Warner 
Available: 
Direct from Muse and 
computer stores nationwide 



Name: SpeedCOBOL and 
ReadCOBOL 

Memory: 64K 

Language: COBOL (ANSI 74) 

Hardware: Any micro, mini, 

or mainframe 
Description: SpeedCOBOL is 
an abbreviation expander for 
COBOL-reserved words and 
phrases, data names, condition 
names, file names, and any 
other string of one to 30 
characters. A direct 50% of 
coding and keying productivity 
improvements can be realized 
and measured with Speed- 
COBOL. Working with abbre- 
viations of one or two charac- 
ters for COBOL words and 
phrases, SpeedCOBOL pre- 
compiles these abbreviations 
to their full length. Read- 
COBOL addresses the seem- 
ingly ever-present program- 
ming resource drain of COBOL 
program maintenance by es- 
tablishing program structure 
standards. These standards are 
maintained by ReadCOBOL 
automatically, not by the pro- 
grammer. Paragraph sequenc- 
ing, standard structuring and 
stylizing are an automatic and 
direct result of ReadCOBOL. 
An optional step of lenaming 
data names, file names, etc. is 
available for impioved pro- 
gram quality. Inspecting the 
results of ReadCOBOL makes 
the improvement in quality 
obvious. Paragraph sequenc- 
ing, installation-wide standard 1 
programming structure and 
common stylizing of source 
statements are all direct 
benefits to the user. 
Price: $500 for 
microcomputers 
$5000 for mainframes 
Includes documentation and 
diskette. 
Author: Foundation for 
Software Engineering 
Available: 
Computers Et Cetera 
524 W. Broadway #111 
Tempe, AZ 85282 
(602) 829-0888 



Name: QUNK, "C" 
Compiler, Full 
Screen Editor 

System: Qunix 
Memory: 64K 
Language: "C" (Kernighan 
and Ritchie full 
implementation) 
Hardware: 6809 or 

8088-based 
microcomputers 
Description: The Qunix oper- 
ating system is a UNIX™-like 
operating system optimized for 
micros. Single-user, single- 
tasking or multi-user, multi- 
tasking versions are available 
together with a full "C" com- 
piler [supports 8087 on IBM 
PC) and ultra fast macro full- 
screen editor. 

Price: $625 

Includes assemblers, 

debuggers, manuals. 
Available: 

Quantum Software Systems 
Incorporated 

7219 Shea Court 

San Jose, CA 95139 



Name: Audio Spectrum 
Analyzer 

System: TRS-80 Color 

Computer 
Description: This program pro- 
vides a colorful and graphic 
display of energy in sound. 
Audio enthusiasts can "watch 
the music/' color bargraphs 
show the relative power dis- 
tribution over a nine-octave 
audio range. A built-in "audio 
kaleidoscope" mode presents 
random changing visual im- 
ages, keyed to the tonal 
distribution and intensity 
("color," in musical terms) of 
the input signal. 

Price: $19.95 

Includes Program Pak, 

instruction manual. 
Available: 

Radio Shack, Computer 

Centers and participating 

dealers 



Name: Computer 

Business Software 

System: Ohio Scientific 
Language: BASIC 
Description: This complete 
business package features 
order entry, inventory control, 
mailing labels, sales reports/ 
history graphs, monthly cash 
reports, G/L distribution 
report, multi-state, multi-pay 
period payroll (with file lock- 



ing), print spooling, and much 

more. 

Price: $64.70 

Available: 

MicroSoftware International, 
Incorporated 

3300 S. Madelyn 

Sioux Falls, SD 57106 

1-800-843-9838 



Name: Jinsam Executive 

Memory: 64K 
Language: Machine 
Hardware: CBMw/8050, 

IBM-PC 
Description: This fast, power- 
ful, flexible data-management 
system contains file handling, 
retrieval, modeling, statistical 
analysis, reports and labels, 
password entry, multi-user 
command files, merge, link, 
and join bases. It holds 65,000 
records, unlimited fields, 
unlimited record lengths. 
Retrieves by scanning record, 
number, or key. 
Price: $40 - User's Manual 
$1295 entire unit 
Entire unit includes 
interfaces, wordprocessing, 
VisiCalc, statistics, ROM, 
disks, pen, binder, and 
manual. 

Author: Jim and Nancy Iscaro 
Available: 

Jini Micro-Systems Inc. 

Box 274 

Kingsbridge Station 

Riverdale, NY 10463 



Name: Classified™ 

System: Apple n, Apple n 

Plus 
Memory: 48K 
Language: Machine 
Hardware: One disk drive 

minimum 
Description: Classified™ en- 
crypts and decrypts the infor- 
mation stored in any standard 
DOS 3.3 diskette file, such as a 
file created by VisiCalc. The 
data sectors are overwritten by 
cipher text, leaving no trace of 
plain text. 

Price: $39.50 

Includes 24-page encryption 

manual. 
Available: 

Passage Research 

945 Turquoise St. 

Suite G 

San Diego, CA 92109 

(714) 488-5358 
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Name: Dual-Comm Plus 

System: Apple II or Apple 

IIPlus 
Language: Apple Pascal, 

BASIC 
Description: This two-port 
serial I/O card combines the 
features of the Apple High 
Speed Serial Card and the Ap- 
ple Communications Card in 
one card with handshaking. 
Thumbwheel switches select 
the Apple slot locations. 
Selectable baud rates range 
from 50 to 19200 baud. On- 
board firmware provides exten- 
sive printer and upper/lower 
case terminal modem support. 
Combined with an 80-column 
card, such as the FULL- VIEW 
80, it turns an Apple into a 
full-operation terminal for a 
computer network system. 
Price: $239.00 

Includes all available 

features. 
Available: 

BIT 3 Computer Corporation 

8120 Penn Ave. S. 

Suite 548 

Minneapolis, MN 55431 

(612) 881-6955 



Name: Model 122 

Industrial Trade 
Graphics Printer 

System: All computers 
Description: Heavy-duty 120 
CPS desktop graphics printer. 
132 columns with pin-address- 
able graphics. Designed to 
fulfill applications such as 
business analysis, computer- 
aided designs, data processing, 
and timesharing computer 
processing. 

Price: $1195 list price 

Includes all standard 

features. 
Available: 

Centronics Data Computer 
Corporation 

1 Wall St. 

Hudson, NH 03051 



Name: Disk-O-Mate 

System: Commodore 

PET/CBM 
Hardware: 2040/4040 disk 

drive 
Description: Disk-O-Mate pro- 
vides the user with write- 
protect switches/indicators for 



each drive, a power ON in- 
dicator, and audible error 
beeper. The ease of write pro- 
tecting drives by switch versus 
diskette labels encourages 
good operating procedure to 
prevent accidentally erasing 
files. All switches and in- 
dicators are mounted in a 
small control box that may be 
placed on the disk unit or near 
the computer. Installation is 
accomplished without special 
tools or skills or any soldering. 
Price: $70 - $80 

Includes assembled unit plus 

installation/user 

instructions. 
Available: 

Optimized Data Systems 

P.O. Box 595 

Placentia, CA 92670 



Name: Olympia ESW 102 

Memory: 4K Bytes 
Description: This is a high- 
quality, cost-effective printer 
developed for the letter quality 
printer market. Standard let- 
tering with varying type styles, 
proportional spacing, four 
pitches, bi-directional print- 
ing, and print wheel cassette 
insertion. Print speed is 17.5 
characters per second. Laser- 
sharp print quality, a choice of 
ribbon systems and economi- 
cal pricing for end users and 
OEMs. 
Price: $1590.00 

Includes interface. 
Available: 

Olympia USA Inc. 

Box 22 

Somerville, NJ 08876 



Name: Model T 

Computer Slide 
System 

System: Apple II Plus 
Memory: 48K 
Language: BASIC 
Hardware: Two disk drives, 
graphics tablet, 
and color monitor 
Description: Product allows 
user to produce 35mm color 
slides. Sold as add-on to ex- 
isting Apple II Plus with two 
disk drives, graphics tablet, 
and monitor. Product consists 
of a film recording device, soft- 
ware, and overlay for tablet. 



Images are created and pre- 
viewed with the system. Once 
the desired image is created 
the computer transfers it to 
35mm color film. The film is 
then removed from the film re- 
cording device and processed. 
The system produces business 
informational slides and ar- 
tistic slides. Five type styles 
are currently available in two 
sizes. The color on the slides is 
very rich. 

Price: $3495.00 (without 
Apple components) 
Includes film recording 
device, software, graphics 
tablet overlay, interface 
card, and manual. 
Available: 
Toucan Visual Production 
Systems 

1033 Battery Street 
San Francisco, CA 94111 
(415| 392-2970 



Name: Model 85 Digital 

Memory 
Oscilloscope 

System: Compatible with 
Apple II or Apple 
nPlus 
Memory: 11. 5K Bytes 
Language: BASIC or 

assembly language 
Description: Laboratory and 
automated measurements were 
never easier with this com- 
pletely programmable digital 
memory oscilloscope con- 
trolled by a co-resident BASIC 
program. Two channels with 
50 MHz bandwidth combined 
with full 8-bit A/D conversion 
provide high accuracy, high 
frequency measurements. Un- 
limited storage time, wave- 
form storage on disk, wave- 
form averaging, cursor DVM, 
hard copy output, compare to 
reference waveforms, and 
more. 

Price: $995.00 
Includes Model 85, user's 
manual, software on one 
5W" floppy disk. 

Available: 
Northwest Instrument 

Systems, Inc. 
P.O. Box 1309 
Beaverton, OR 97075 
(800) 547-4445 



Name: I/OX-122 

I/O Expansion 
Board 

System: 6500 
Description: I/O expansion for 
the SYM-1, AIM-1, and other 
microcomputers that use 6522 
VIAs for I/O and do not pro- 
vide full address decoding on- 
board. This board has physical 
space for four additional 6522 
VIAs, and provides additional 
decoding for a total of 16 
devices at intervals of your 
choice. Connectors for all I/O 
lines, and further expansion 
are included. All 6522 func- 
tions are available, with no in- 
terference with previous func- 
tions of the original VIA. Two 
versions of this board are 
available. The I/OX-122 
mounts above, and directly 
plugs into, an on-board 6522 
socket, and relocates the 
original VIA to the expansion 
board. Where there are space 
limitations, the I/OX-222 uses 
a dip header and cable for 
remote installation. 

Price: $49.95 

OEM and dealer inquiries 

welcome. 

Includes expansion board 

and one 6522. 
Available: 

Alternative Energy Products 

P.O. Box 1019 

Whittier, CA 90609 

Name: ISAAC 

System: Apple 
Memory: 48K 
Language: Labsoft (Extended 
Applesoft BASIC) 
Hardware: Disk drive, 

monitor, printer 
Description: ISAAC provides a 
hardware interface and Labsoft 
language to allow the Apple II 
Plus to interface with real 
world signals. Used for labora- 
tory automation, electronic 
tests, or process control. 
Price: $3950.00 

as addition to current Apple. 

$6000-59000 for total system 

with Apple and various 

peripherals. 
Available: 

Cyborg Corporation 

55 Chapel Street 

Newton, MA 02158 

(Continued) 
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Name: AMDEK 13-inch 
"Color ID" 
Monitor 

System: Apple II, Apple HI 
Hardware: Monitors, plotter, 

disk drive 
Description: The AMDEK 
13-inch color monitor provides 
affordable high-plus resolution 
graphics. It is designed with 
RGB video input and a com- 
mercial grade CRT; sharp and 
crisp color separation, 260 (H) 
x 300 (V) line resolution; 
80- x 24-character display 
capability. 
Price: $569.00 
Available: 

AMDEK Corporation 

2201 Lively Blvd. 

Elk Grove Village, IL 60007 

(312) 364-1180 

TLX: 25-4786 



Name: UP-9705 5V4" 

Winchester Disk 
Subsystem 

System: Compatible with 
many systems 
including Apple, 
IBM PC, Q-bus, 
S100, and 
multibus systems. 
Description: This is a 
5-megabyte universal SVt" 
Winchester mass-storage sub- 
system that features inter- 
changeable host adaptor per- 
sonality cards. The unit 
measures 4.75 x 6.5 x 14.2 
inches and weighs 16 lbs. 
Price: $2,995 for one 
Includes one host adaptor 
and documentation. 

Available: 
United Peripherals 
432 Lakeside Drive 
Sunnyvale, CA 94086 
(408) 730-4440 
TWX: 910-339-9359 



Name: Appli-Card 

System: Apple II 
Memory: 64K on-board 

memory 
Hardware: Z80 

Microprocessor 
Description: The Appli- 
Card™ is a single card that 
uses the CP/M operating sys- 
tem and can execute Word- 
Star™ and use its full features. 
The hardware contributions of 
the Appli-Caid are 64K of on- 
card memory for application 
development and execution. 
The Appli-Card comes stan- 
dard with a 4 MHz Z80A or a 6 
MHz Z80B. Also, the Z80A or 
Z80B CPUs can run at their 
maximum speed. One can 



have from 2K to 8K of EPROM 
on the card and a real time 
clock is supported. An expan- 
sion interface port is available 
for added extra memory for 
future versions of CP/M and to 
support other Z80 peripherals. 
The 6502 and the Z80A or 
Z80B processors are able to run 
simultaneously and at full 
speed. The Appli-Card is 
designed to support CP/M ap- 
plications with only one card. 
The unique SoftVideo™ 
features include upper and 
lower case, 40-column to 
255-column horizontal scroll- 
ing, and also 70 columns by 24 
lines is available using the 
high-resolution graphics on 
the Apple n. 
Price: $595.00 

Includes Appli-Card, CP/M, 

and WordStar. 
Available: 

Personal Computer 
Products, Inc. 

16776 Bernardo Center Dr. 

Suite 203 

San Diego, CA 92128 



Name: Ultimate RS- 

4/OV-l Computer 

System: Dedicated 
Memory: 64K — 48K ROM, 

16KRAM 
Language: Machine 
Hardware: TeleVideo 912-C 
Terminal w/ built- 
in board (64K) by 
Cannella Corp. 
Description: The Ultimate 
computer is designed to handi- 
cap horse racing — makes a pro 
out of even an amateur. The 
Ultimate computes and rates 
according to the principle of 
established class, assigns each 
horse a specific rating, handi- 
caps, summarizes data for up 
to 25 horses per race, and 
displays them in order of bet- 
ting qualification. 

Price: $6,000 

$5,000 for the computer 

$1,000 for Epson MX-80 

Printer 
Available: 

Cannella Corp. 

Armond F. Cannella, Pres. 

420 E. Genesee St. 

Suite 208 

Syracuse, NY 13202 



Name: Slim 81-260 
System: Apple II 
Memory: 2K RAM, 4K 

EPROM - 

expandable to 32K 



Hardware: JBE Parallel 

Interface Card and 
EPROM 
Programmer 
Description: Slim is a 4.5 x 
6.5 single-board large-scale in- 
tegration microcomputer using 
a 6502 microprocessor, two 
6522 VIAs, four 2114 RAMs, 
and 2516, 2716, or 2532 
EPROM. The fully-buffered 
22/44-pin bus is similar to the 
KIM, SYM, and AIM expan- 
sion connector. Four 8-bit I/O 
ports connect through 16-pin 
DIP sockets. 
Price: $199.95 
Available: 
John Bell Engineering 
1014 Center Street 
San Carlos, CA 94070 



Name: Apple Interface 
Breadboard 

System: Apple II 
Memory: 16K Read/ write, 
minimum 
configuration 
Language: BASIC or 
assembly 
Description: The Apple Inter- 
face Breadboard provides con- 
trolled access to those signals 
needed to control external 
devices. User can design and 
operate custom interfaces 
using BASIC. Data bus is fully 
buffered and protected. Up to 
eight decoded outputs avail- 
able; up to 256 I/O devices 
may be addressed. A probe cir- 
cuit detects logic signals and 
pulse edges. All interface 
signals available through 
solderless breadboard for per- 
forming experiments using 
hookup wire. 
Price: $235.00 — Kit 
(BG-125KJ 

$310.00 — Assembled 
(BG-125A) 
for 110V operation. 
Includes power supply, all 
parts, BG-110 Cablecard, 
and text Apple Interfacing 
w/Exp. Required but not 
included — interconnect 
cable (BG-Cable ($14.95). 
Available: 
Group Technology, Ltd. 
P.O. Box 87 
Check, VA 24072 
(703) 651-3153 



Name: 212LP Direct 

Connect Modem 

System: RS-232 
Description: The 212LP is a 
1200 bps-only full duplex, 
asynchronous modem. This 
manual answer unit requires 
no external AC power. All 



operating power is from the 
telephone line. It is FCC cer- 
tified for direct connection to 
the public-switched telephone 
network and compatible with 
the high-speed channel of the 
Bell 212A 
Price: $495.00 

Includes operating manual, 

phone connect cable, and 

warranty . 
Available: 

Universal Data Systems 

5000 Bradford Drive 

Huntsville, AL 35805 



Name: PromQueen VIC 
Cartridge 

System: Commodore 

VIC-20 
Memory: 4K up 
Hardware: Requires 

expansion chassis 
if used with other 
expansions. 
Language: 6502 machine 
code, BASIC, 
other uP machine 
codes 
Description: A self contained 
cartridge mating to the VIC's 
expansion port equips the 
VIC-20 for 8-bit micro- 
processor system develop- 
ment. The cartridge contains 
4K's of RAM accessible both to 
the VIC and to an external 
microprocessor system under 
development. DIP switch sets 
to any of 4 expansion blocks of 
the VIC. 
Price: $169.50 
Includes 24 pin textool 
socket and built-in 2716, 
2732 and 2732A EPROM 
programmer with power 
supply. Development and 
EPROM utility software on 
2732A EPROM, 32 page 
manual. 
Available: 
Gloucester Computer Bus 
Co., Inc. 
6 Brooks Road 
Gloucester, MA 01930 
[617) 283-7719 



Name: MPC Bubble 

Memory Board 

System: Apple II, Apple II 

Plus 
Memory: 1 Megabit 
Language: BASIC, Pascal, 

CP/M 
Description: Bubble Memory 
Board has 128K bytes of non- 
volatile memory. It comes 
with software to emulate one 
floppy disk; autoboot PROM 
on board is for stand-alone 
pseudo disk operation. 

(Continued) 
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Piice: $895.00 

Includes board/ disk 

emulatoi software. 
Available: 

MPC Peripherals Corp. 

9424 Chesapeake Drive 

San Diego, CA 92123 

Name: MetaCard 

System: Apple II or Apple 

II Plus 
Memory: 48K min. 
Hardware: Disk II 
Language: CP/M-86 Supplied 
Description: MetaCard is a 
secondary processor card with: 
5Mhz. Intel 8088 micro- 
processor, 64K bytes dynamic 
RAM expandable to 128K, ex- 
ternal power supply, 2716 
EPROM with power-up 
diagnostics and initialization 
logic, real-time clock, 
CP/M-86 operating system 
with optional MS-DOS or 
UCSD Pascal IV .0, provision 
for integration with future pro- 
ducts, including 8087 piggy- 
back board and additional 
256K memory card. 
Price: Introductory prices: 

64K-S980, 128K-S1230 

(U.S. and Canada) 

Includes power supply, 64K 

RAM (pre-tested), CP/M-86 

on Apple disks, complete 

documentation. 
Available: 

Metamorphic Systems, Inc. 

P.O. Box 1541 

Boulder, CO 80306 



Name: Pi-1, Pi-2, Pi-3 

Video Monitors 

Description: Low-cost, high 
resolution monitors are 
available in 9" or 12" ver- 
sions. Features are: 80x24 
character display, resolution of 
1000 lines at center, band 
width 20 Mhz. A front metal 
case provides complete 
shielding allowing stackability 
controls. It is compatible with 
all small business computers. 
Price: Pi-1, $249; Pi-2, $275; 

Pi-3, $289 retail. 
Available: 

USI International, 

Computer Products Division 

71 Park Lane, 

Brisbane, CA 94005 

(5151 468-2900 



Name: Electric Typing 

Fingers (ETJ-80J 

Hardware: Comes with own 
power supply and 
cables 



A peripheral that turns an IBM 
Selectric* (or similar elec- 
tronic typewriterl into a fast, 
letter-quality, economical 
printer. It is a sensible alter- 
native to purchasing the more 
expansive daisy wheel printer 
and there are no typewriter 
modifications necessary. 
•Selectric is a registered 
trademark of IBM, Incor- 
porated. 
Price: $495.00 

Includes power supply and 

connecting cable. 
Available: 

Personal Micro Computers, 

Inc. 

475 Ellis Street 

Mt. View, CA 94043 

(4151 962-0220 



Name: PKASO ID12 

-Color Interface 

System: Apple II or Apple 

HI Computers 
Hardware: ID12 - Color 

Interface 
Description: The ID12 - color 
Interface converts your Apple 
Computer and IDS Color 
Prism printer to a complete 
text and graphic output 
system. Features include: full 
snapshot dump of any screen 
image, hi-res and lo-res screen 
prints using accurate screen 
colors, quick commands to 
swap and rearrange the color 
set, quick commands to 
change printing colors even 
within the word processor 
text. 
Price: $195.00 - $225.00 

Includes cable, instructional 

diskette and comprehensive 

manual. 
Available: 

Interactive Structures 

146 Montgomery Ave. 

P.O. Box 404 

Bala Cynwyd, PA 19004 

(215) 667-1713 



Name: Model 140-RS 

Computer 
Interface 

System: Accepts serial data 
from computer to 
operate random 
access slide 
projector, Kodak 
or Mast 
Description: This interface is 
designed to convert an 
asynchronous-serial data 
stream into signals usable by 
Master Kodak random-access 
slide projectors. 

(Continued} 




Your Salvation 

In The Sea Of 

Inflation. 

P.O. Box 2025 • Corona, CA • 91720 



Microtek Parallel 

Printer Interface 

$59.95 

This popular printer inter- 
face card, manufactured by 
Microtek, is a steal at $59.95. 
The Printer card comes 
complete with cable and a 
Centronics compatible con- 
nector (Amphenol). Works 
with Basic, CP/M, and Pas- 
cal. This card also has graph- 
ics capabilities. 

Diskettes 

w/Hubring 10 

$19.95 

High quality diskettes at a 
bargain price. Everyone 
needs diskettes for backing 
up other disks, saving pro- 
grams, etc. We buy these 
diskettes in bulk and then 
pass the savings onto you. 
Remember, they do have 
hubring and come with a 1 
year guaranty. NOTE: Please 
call for quanities of 100 or 
more for special pricing. 

Auto-Repeat 
Device 
$14.95 

For those who want the 
feature that many Main- 
Frame Computers have, here 
is the Auto-Repeat device. 
This device does not take up 
aslot or crowd your APPLE II. 
Auto-Repeat fits right on the 
newer style Apple Key- 
boards. The speed of the 

ORDERING IN 



Auto-Repeat can be varied to 
suit your needs. NOTE: Auto- 
Repeat device will only work 
on newer APPLE II key- 
boards. 

Lazer Lower Case 
+ Plus II 
$19.95 

For the budget minded 
user with quality in mind. This 
lower case adapter will work 
with all Rev. 7 and later AP- 
PLE ll's. The Lower Case 
■f Plus II includes Basic and 
Pascal software. Works with 
many popular word proces- 
sors. 

Also Available 
From LAZER 

ANIX 1.0 $34.95, This soft- 
ware program is a set of in- 
credible disk utilities with a 
UNIX-like operating system. 
LAZER Pascal $29.95 A un- 
ique systems programming 
language for Anix 1.0 with 
many features of the 'C pro- 
gramming language. 

Disk Drive Cables 
$24.95 

These cables replace the 
cables that are connected to 
the Apple Disk Drive already. 
If you feel that can not put 
your Disk Drives where you 
want them, here's your an- 
swer. The Cables are 4' long 
and are pre-tested for your 
assurance. 

FORMATION 



We accept: VISA/MASTERCARD (include card #, ex- 
piration date, and signature), Cashier or Certified Checks, 
Money Orders, or Personal Checks (please allow 10 
business days to clear). We also accept COD's (please 
include $2.00 COD charge). 

Please add 3% for shipping and handling (minimum 
$2.00). Foreign orders please add 10% for shipping and 
handling (minimum ($10.00). 

California residents add 6% sales tax. All equipment is 
subject to price change and availability without notice. All 
equipment is new and complete with manufacturer's war- 
ranty. 



(714)735-2250 
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Price: $621.00 

Includes interface package, 

connec tings cable. 
Available: 

Mast Development Co. 

2212 East 12th Street 

Davenport, IO 52803 



Name: Corvus Systems 

Disks 

System: Atari 800 
Memory: 6 Megabits 
Hardware: Winchester Disk 
Description: The Corvus Sys- 
tem 6 MB hard-disk drive inter- 
faces with Atari 800. It has two 
plotters and four data surfaces; 
the diameter is 5i4 inches. 
Price: $3,595 
Includes Z80 micro- 
processor, controller, 
managing bidirectional data 
transfer. 
Available: 
Corvus Systems 
2029 O'Toole Ave. 
San Jose, CA 95131 
[408) 946-7700 



Name: Slot 8 

System: Apple II, Apple II 

Plus 
Memory: 16K 
Language: BASIC, Pascal, 

CP/M, Assembly 
(6809, 6502, etc.) 
Description: Slot 8 is a space- 
saver for the Apple II and pro- 
vides the user with an extra 
slot for peripheral use. Slot 8 
plugs into slot 7 and provides 
two slots on the Apple mother- 
board. Most peripheral cards for 
the Apple will work in Slot 8. 

Includes Slot 8 card and 

manual of operation. 
Available: 

Legend Industries, Ltd. 

2220 Scott Lake Rd. 

Pontiac, MI 48054 

(313) 674-0954 



Name: DATASAVEK™ 

AC Power Backup 
Unit 

System: Any 
Description: DATASAVER™ 
provides uninterrupted AC 
power to microcomputer sys- 
tems and instruments. The 90 
watt capacity unit is for Apple 



n/m and TRS-80 m systems. 
The 200 watt unit covers larger 
systems including 5i4" fixed 
disk drives. The desk-top unit 
is just 4" x 6" x 9V4"andhas 
internal battery for five 
minutes of automatic power 
hold-up. 

Price: $395 - 90 watt 

$695 - 200 watt 

Includes overvoltage 

protection and power status 

indicator LED, buzzer, and 

interrupt signal. 
Available: 

Cuesta Systems, Inc. 

3440 Roberto Court 

San Luis Obispo, CA 93401 

|805) 541-4160 

Name: 2809 Softboard 
System 

System: 6809 SS50 Bus 
computers 
(SWTPC, Gimix, 
Smoke Signal) 
Description: The 2809 soft- 
board system enables 6809 
SS50 Bus users to immediately 
run over 2000 CP/M applica- 
tion programs on their com- 
puters 

Price: $595.00 
Includes 50 pin processor 
board, CP/M 2.2, editor, 



assembler, debugger, and 
complete reference manuals. 
Available: 
Meta Lab 
P.O. Box 1559 
Suite 106 
2888 Bluff Street 
Boulder, CO 80301 
(303) 499-4236 



Name: M 78-5 TrimForm 

Printer 

Memory: Line buffer, or IK 

data buffer 
Language: ASCII 
Description: This printer has 
140 characters per second, 
tractor feed for forms up to 9.5" 
wide, 96-character set |upper/ 
lower), OCR-A (optional), bar 
code, vertical forms control 
unit, quiet 56 dbA, RS-232 
serial interface, integral form 
cutting device under host con- 
trol, and self test. 
Price: $4345 

Includes all hardware. 
Available: 

Mannesmann Tally 

8301 South 180th St. 

Kent, WA 98031 

(206) 251-5524 



JUCRO 



QCB-9 SINGLE BOARD COMPUTER 

• 6809 BASED 

• RUNS TSC FLEX DOS 

• QCB-9M S-100 BUS 



$149.00 



• QCB-9/2 SS-50 BUS 



♦PARTIAL KIT 

FEATURES 




• 5'/4" Floppy Controller 

• Serial RS-232 Port 

• Centronics Type Printer Port 

• Keyboard /Parallel Port 

• 24K Bytes of Memory 

• QBUG Resident Monitor 

• 6802 Adaptor 

FULLY ASSEMBLED 

& TESTED $389.00 

• 48-hour Burn-in 

• 90 Day Warranty 



NAKED-09 SS-50 6809 CPU CARD $49.95* 

* 1K OF RAM AT E400 Assembled S, Tested $149.00 Documenfation 

* 6K OF EPROM AT E8C0-FFFF 2 MHZ Version $189.00 Only 

* HIGH QUALITY DOUBLE SIDED PCB * SOLDER MASKED * SILK SCREENED 



TSC, FLEX DOS, ASSEMBLER, EDITOR 



$150.00 



QBUG RESIDENT MONITOR 

* Disc Boot * Memory Test 

* Memory Exam & Exchange * Zero Memory 

* Memory Dump * fill Memory 



$50.00 

* Break Points 

* Jump to User Program 

* Register Display & Change 



QBUG IS A TRADEMARK OF LOGICAL DEVICES INC., " Copyright 1981 
PHONE ORDERS: (305) 776-587 

LOGICAL DEVICES INC. 

COMPUTER PRODUCTS DIVISION 
781 W. OAKLAND PARK BLVD. • FT. LAUDERDALE, FL 33311 

TWX: 510-955-9496 • WE ACCEPT VISA, MC, CHECKS, C.O.O., MONEY ORDER 



How to run a listing in 

Software/Hardware 



The Software and Hardware Catalogs 
are provided as a service both to our readers 
and to the manufacturers. These entries 
are not MICRO reviews, but descriptions 
provided by the manufacturer. 

To run a free listing in either catalog, a 
fills out the appropriate form or 



company xxxx^ ^^^ ^^ a . t , t ,'-^t"-'- a -'-^ xwxxxx ^x 
merely mails in their material in the same 
format that appears in the magazine. 



We try to limit entries to one company 
per month, on a first-come-first-serve 
basis. 

If you sell products our readers should 
know about, write to Software/Hardware 
Catalog, MICRO, P.O. Box 6502, 
Chelmsford, MA 01824. 
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READER SURVEY: SEPTEMBER 1982 

WE NEED YOUR HELP! To keep MICRO in touch with the rapidly changing computer world so that 
we can give you the information you need, please take a minute to fill in this questionnaire and mail 
it back to us. THANK YOU for your time. 

1. How long have you subscribed to or read MICRO? 

□ Less than 6 months □ 6 months to 1 year D Over 1 year □ Over 2 years □ Over 3 years D From the beginning 

2. How did you get your current issue? 

□ Subscription □ Computer store D Newsstand Q Bookstore □ Borrowed □ Library 

DEMOGRAPHICS 

3. What is your age? 

D-17 □ 18-25 □ 26-35 □ 36-45 46-55 56-65 D 65 + 

4. What is your occupation? 

D Programmer/analyst O Engineer □ Technician 

O Professor/teacher D Lawyer □ Doctor 

D Business person □ Student O Other 



5. What is your formal educational level? 

□ Fewer than 12 years O High school graduate O Associate degree □ Bachelor's degree □ Para-professional degree 
O Advanced degree 

6. What is your annual household income before taxes? 

O Less than $15,000 □ $15,000-19,999 O $20,000-24,999 □ $25,000-34-,999 O $35,000-44,999 O $45,000-54,999 □ $55,000 + 

COMPUTER INFORMATION 

7. What microcomputer(s) do you use? 

□ AIM O Apple II □ Apple III O Atari (please specify model) □ KIM □ OSI (please specify model) 

O CBM/PET □ SuperPET O VIC □ SYM □ TRS-80 Color Computer O Other 6502- O Other 6809 

O Other processor(s) . . . 

8. Where do you use the above computer(s)? 

D Home □ Work O School □ Other 



9. Approximately how much have you spent on your computer equipment so far? 

□ -$500 □ $500-999 □ $1,000-1,999 O $2,000-2,999 O $3,000-3,999 O $4,000-4,999 □$5,000-9,999 □ $10,000 + 

10. Approximately how much do you expect to spend on your computer equipment in the next year? 

O -$500 □ $500-999 □ $1 ,000-1,999 O $2,000-2,999 O $3,000-3,999 □ $4,000-4,999 □ $5,000-9,999 □ $10,000 + 

1 1 . Approximately how much have you spent on your computer software so far? 

□ -$200 O $200-499 D $500-999 D $1,000-1,999 □ $2,000 + 

12. Approximately how much do you expect to spend on computer software in the next year? 
D -$200 □ $200-499 O $500-999 □ $1,000-1,999 D $2,000 + 

13. What sorts of additions to your basic system have you made? 

□ Disk Drives □ Modem □ Serial Interface □ Parallel Interface D RAM cards □ 6809 card O 68000 card □ ZB0 card 

□ Printer (type) O Other 



14. What additional changes or upgrades would you like to add to your system? 

O Disk Drives □ Modem O Serial Interface □ Parallel Interface □ RAM cards □ 6809 card □ 68000 card O Z80 card 
D Printer (type) □ Other 



15. How do you use your computer equipment? 

□ Business D Software Development O Hardware Development □ Telecommunications D Entertainment □ Hobby O Education 
O Communications O Word Processing (type) O Database Management 

16. What languages do you use? 

O BASIC O Pascal O FORTH D COBOL O APL □ LOGO □ LISP □ 6502 Assembler O 6809 Assembler 

O 68000 Assembler O Other 

17. In an average week, about how many hours do you spend on a microcomputer performing the following operations? 

Programming for fun or self-education 

Programming professionally 

Using packaged programs in business 

Using packaged programs at home 

Using packaged programs for education 

Playing games 

Other 
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18. If you write programs, what type of programming do you spend most of your time developing? 

□ Business applications D Games □ Software development utilities 

19. In an average month how much time do you spend with MICRO? 

□ Less than 2 hours O 2-4 hours O 4-8 hours D More than 8 hours 

20. How would you rate your present microcomputer knowledge? 
Software: O Elementary □ Intermediate O Advanced 
Hardware: □ Elementary O Intermediate □ Advanced 

21. Have you ever constructed a computer or computer equipment? O Yes □ No 

If yes, describe 



22. Have you switched from one computer to another? O Yes □ No 
If yes, explain 



(Continued on reverse side) 



MAGAZINE 

23. To what other computer publications do you subscribe? 

□ BYTE □ Compute! D DDr. Dobbs □ Kilobaud Microcomputing D Nibble D Softside D Softalk 

□ Popular Computing □ Personal Computing □ 80 Microcomputing □ 68 Micro □ Interface Age □ Transactor 

□ Other(s) 

24. Please rate the following parts of MICRO as to their interest, with 5 being very interesting and 1 not at all 





5 


4 


3 


2 


1 


News 


□ 


□ 


□ 


□ 


a 


Articles 


□ 


□ 


□ 


a 


□ 


Reviews 


□ 


□ 


□ 


a 


a 



Hardware & Software Catalogs 
System specific information 
New Publications 



5 4 3 2 

□ □ a □ 
a □ □ □ 

nana 



interesting. 














5 


4 


3 


2 


1 


Advertisements 


□ 


□ 


□ 


□ 


□ 


Columns 


□ 


□ 


□ 


□ 


□ 


Editorials 


D 


□ 


□ 


□ 


D 



25. Please rate the following kinds of articles as to their interest, with 5 being very interesting and 1 not at all interesting. 

54321 54321 

Hardware tutorials □ □ □ □ □ Applications Q □ □ □ □ Review articles 

Programming techniques D D D D D Games □ d □ □ □ 

Utilities □ □ □ □ □ News & Information □ □ □ □ □ 



26. Is MICRO □ too technical □ not technical enough D just right? 

27. Have you written articles for publication? □ Yes □ No 

28. Would you be willing to pay extra to receive MICRO'S programs in another form? □ Yes DNo 

29. If yes to #28, which form would you prefer? 

□ Printed □ Disk □ The Source □ MicroNet Q Other 

30. Overall, how do you feel about MICRO? How useful is MICRO to you? 
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IN THE 
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MICRO 

34 Chelmsford Street 
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ON THE 6809 MICRO 
WORTH SWITCHING FOR 



FOCUS ... on its 

SUPERIOR HARDWARE 



• 6809E Microprocessor provides 8-bit economy with 16-bit 
capabilities, position independent code and many advanced 
features 

• Commercial quality Keyboard with full UPPER/lower case 
ASCII, numeric keypad and cursor control keys 

• Two double-sided double-density mini diskettes with 
640K bytes of IBM-compatible storage 

• 56K Bytes User RAM 

• Full Video with programmable screen formats, bit mapped 
graphics, user definable character sets, reverse video and 
hardware scrolling, plus a light pen interface 

• Full Communications support for RS-232 at 50 to 19.2K 
baud with programmable data formats 

• Built-in I/O Drivers include 6 parallel I/O ports, 3 serial I/O 
ports, 6 timers/counters, 20 mA current loop, and a 
programmable cassette interface 



FOCUS ... onus 

EXTRAORDINARY SOFTWARE 






Choice of two 'Universal' 6809 Disk Operating Systems 
supported by many companies: FLEX™orOS-9™ 

Extended Floating Point Disk BASIC 

Interpreted and Compiled 
Text Editor and Macro Assembler 
Full feature FlexiMon debugging monitor 
Built-in Word Processor 



: OCUS ... ON ITS 

VERSATILE EXPANDABILITY 






IEEE-488 Bus Controller option for instrumentation 

Supports multiple 8" diskette drives 

PASCAL, FORTH and other high level programming 

languages are available 

Complete Application Packages are available from many 

software sources 

Add-on Hardware includes: Date/Time, Opto-lsolators, 

Stepper-Motor Controller, A/D and D/A, RAM and EPROM 

Memory, and others from several manufacturers 



>CUS ... ON YOUR 

APPLICATION REQUIREMENTS 



• FOCUS provides a completely Integrated system of 
hardware and software, so that you can concentrate on 
your application requirements 



'Licensing arrangement for OS-9 pending. 
Please contact The COMPUTER 1ST,, trie, for further details. 



THIS IS 

FOCUS 




$549 *°° 

VERy CoMplETE 



34 Chelmsford Street 
Chelmsford, MA 01824 

Phone: 617/256-3649 
Telex: 955318 INTL DIV 




r. lX)bb's Journal 

For Users of Small Computer Systems m 





with topics like: 

SmallC 

FORTH 

Lisp 

CP/M 

S-100 

Cross-assemblers 

8086/8088 

16-bit tech. 

Pascal 

Assembler 

Compilers 

Algorithms 

8080/Z80 

6502 

etc. 



Dr. Dorb's Journal 




Are you ready? 

DDJ, the world's foremost micro- 
computer publication, has been work- 
ing for years to prepare its readers to 
be innovators, to lead the wave of 
breakthroughs in our changing tech- 
nology. 

Every issue of Dr. Dobb's Journal 
helps one to understand the nuts and 
bolts of small computer systems. We 
offer entire listings of valuable soft- 
ware: our pages have included com- 
pilers," cross-assemblers, editors, new 
languages, hardware interfaces and 
more — usually before anyone else 
thinks of them! 

Even more 



Each issue includes: 

• valuable software tools 

• algorithms & problem solving 

• industry news 

• important product reviews 

With in depth coverage of: 

• telecommunications 

• systems programming 

• language development 

• machine independent programs 

and much, much more! 



Yes ! Please enter my subscription for 



T4 



□ 1 yr. (12 issues) $25 

□ Please bill me 

Name 



□ 2 yrs. $47 (save $13 off newsstand) 

□ I enclose check/money order 



Address 
City 



. State. 



.Zip. 



important! 



As valuable and significant as all 
those things are, there is an even grea 
er reason for you to join forces with 
DDJ. That is the keen, responsive 
readership. Our subscribers share in- 
sights, correspond, and contribute t( 
one another's work, more than any 
other group we know. They treat 
Dr. Dobb's Journal as a "hands-on" 
publication. 

This warm cooperation has done 
more to refine software products, am 
generally to advance the state of 
microcomputer technology, than per 
haps any other resource. And it is 
available to you tnrough our pages! 

For the straight 
Facts . . . 

If you are a serious computing 
professional or enthusiast, then you 
should take a very close look at whal 
DDJ offers you. We've been on the 
cutting edge since 1976. 



Dr. Dobb 's Journal • A Publication of People's Computer Company, 1 263 El Camino Real, P. O. Box E, Menlo Park, CA 94025 



MC68000 



O 



MC68000 16-bit Microprocessor 

Manufactured by Motorola. 16-bit design increases speed and 
addressing capability. Well-suited to high-level operating systems, 
including UNIX, and to modular, reentrant, and relocatable 
programming. 

Design based on PDP-11 minicomputer, includes: 

32-bit data and address registers 
16 megabyte direct addressing range 
56 different instructions 

14 different addressing modes for most instructions 
5 main data types: bit, byte, word, long word, and decimal 
Memory-mapped I/O 

Programming model includes two 32-bit stack pointers, 32-bit pro- 
gram counter, 8-bit status register, eight 32-bit data registers, and 
seven 32-bit address registers. The eight data registers, seven 
address registers, and two stack pointers may all be used as index 
registers. 

Included in many new computers, including TRS-80 Model 16, Cor- 
vus Concept, SAGE II, and Fortune 32:16. 

Included in add-on boards manufactured by DTACK Grounded, 
Motorola, and others for Apple, PET, and other 8-bit computers. 



15 14 13 12 11 



Instruction Format 

10 9 8 7 6 5 



1 



Operation Word 
(First Word Specifies Operation and Modes) 



Immediate Operand 
(If Any, One or Two Words) 



Source Effective Address Extension 
(If Any, One or Two Words) 



Destination Effective Address Extension 
(If Any, One or Two Words) 



31 



Status Register 

System Byte 



Trace Mode 

Supervisor 

State 

Interrupt 

Mask 

{Extend 
Negative 
Zero 
Overflow 
Carry 



Codes 




31 



31 



Pin Assignment 



HALTC 



Programming Model 

16 15 8 7 



15 



User Stack Pointer 



Supervisor Stack Pointer 



64 


Z3D5 


63 


=ID6 


62 


Z3D7 


61 


nos 


60 


=ID9 


59 


3D10 


58 


3D 11 


57 


Z1D12 


56 


Z3D13 


55 


=3D14 


54- 


3D15 


53 


3GND 


52 


P3A23 


51 


Z3A22 


50 


i=IA21 


49 


=JVcc 


48 


3A20 


47 


CT1A19 


46 


aAi8 


45 


3A17 


44- 


PA16 


43 


QA15 


42"=3A14 


41 


=3A13 


40 


Z1A12 


39 


3A11 


38 


Z3A10 


37.nA9 


36 


HJ.A8 


35 


=IA7 


34 


Z3A6 


33 


Z3A5 





_D1 
_D2 
_ D3 Eight 

D4 Data 

Qg Registers 

~D6 

D7 



AO 

A1 

A2 Seven 

A3 Address 

A4 Registers 

A5 

A6 



A7 



15 87 

[System Byte User Bytej 



, Two Stack 
Pointers 

Program 
Counter 

Status 
Register 



JMCftO 



Data Sheet #8 



MC68000 



Instruction Set 



SO 

u 



co 

<D 

c 

(0 

*-• 
CO 

Q 



Mnemonic 


Description 


ABCD 

ADD 

AND 

ASL 

ASR 


Add Decimal with Extend 
Add 

Logical And 
Arithmetic Shift Left 
Arithmetic Shift Right 


Bcc 

BCHG 

BCLR 

BRA 

BSET 

BSR 

BTST 


Branch Conditional 
Bit Test and Change 
Bit Test and Clear 
Branch Always 
Bit Test and Set 
Branch to Subroutine 
Bit Test 


CHK 
CLR 
CMP 


Check Register Against Bounds 

Clear Operand 

Compare 


DBcc 
DIVS 
DIVU 


Test Condition, Decrement and Branch 
Signed Divide 
Unsigned Divide 



Mnemonic 


Description 


EOR 
EXG 
EXT 


Exclusive OR 
Exchange Registers 
Sign Extend 


JMP 
JSR 


Jump 

Jump to Subroutine 


LEA 
LINK 
LSL 
LSR 


Load Effective Address 
Link Stack 
Logical Shift Left 
Logical Shift Right 


MOVE 

MOVEM 

MOVEP 

MULS 

MULU 


Move 

Move Multiple Registers 
Move Peripheral Data 
Signed Multiply 
Unsigned Multiply 


NBCD 
NEG 
NOP 
NO 


Negate Decimal with Extend 

Negate 

No Operation 

Ones Complement 



Mnemonic 


Description 


OR 


Logical OR 


PEA 


Push Effective Address 


RESET 

ROL 

ROR 

ROXL 

ROXR 

RTE 

RTR 

RTS 


Reset External Devices 
Rotate Left without Extend 
Rotate Right without Extend 
Rotate Left with Extend 
Rotate Right with Extend 
Return from Exception 
Return and Restore 
Return from Subroutine 


SBCD 

Sec 

STOP 

SUB 

SWAP 


Subtract Decimal with Extend 

Set Conditonal 

Stop 

Subtract 

Swap Data Register Halves 


TAS 
TRAP 
TRAPV 
TST 


Test and Set Operand 

Trap 

Trap on Overflow 

Test 


UNLK 


Unlink 



Variations of Instruction Types* 



Instruction 
Type 


Variation 


Description 


ADD 


ADD 

ADDA 

ADDO 

ADDI 

ADDX 


Add 

Add Address 
Add Quick 
Add Immediate 
Add with Extend 


AND 


AND 
ANDI 

ANDI to CCR 
ANDI to SR 


Logical AND 

AND Immediate 

AND Immediate to Condition Code 

AND Immediate to Status Register 


CMP 


CMP 
CMPA 
CMPM 
CMPI 


Compare 
Compare Address 
Compare Memory 
Compare Immediate 


EOR 


EOR 
EORI 

EORI to CCR 
EORI lo SR 


Exclusive OR 

Exclusive OR Immediate 

Exclusive Immediate to Condition Codes 

Exclusive OR Immediate to Status Register 



•Additional instructions — actually special variations of those above. 



Data Addressing Modes 






Data Organization In Memory 



Bit Data 
1 Byte = 8 Bits 



Mods 


Generation 


Register Direct Addressing 
Data Register Direct 
Address Register Direct 


EA = Dn 
EA = An 


Absolute Data Addressing 
Absolute Short 
Absolute Long 


EA = (Next Word) 

EA m (Next Two Words) 


Program Counter Relative Addressing 

Relative with Offset 

Relative with Index and Offset 


EA = (PC) + d tl 

EA ■ (PC) + (Xn) + d. 


Register Indirect Addressing 
Register Indirect 
Postincrement Register Indirect 
Predecrement Register Indirect 
Register Indirect with Offset 
Indexed Register Indirect with Offset 


EA = (An) 

EA ■ (An), An ■*- An + N 

An^-An - N, EA = (An) 

EA = (An) + d 1t 

EA = (An) + (Xn) + d. 


Immediate Data Addressing 

Immediate 

Quick Immediate 


DATA = Next Word(s) 
Inherent Data 


Implied Addressing 
Implied Register 


EA = SR, USP, SP, PC 



7 


6 


5 


4 


3 


2 


1 






















Integer Data 
1 Byte = 8 Bits 



1 Word = 16 Bits 



i 



Instruction 
Type 


Variation 


Description 


MOVE 


MOVE 
MOVEA 
MOVEQ 
MOVE to CCfl 
MOVE to SR 
MOVE from SR 
MOVE to USP 


Move 

Move Address 

Move Quick 

Move to Condition Codes 

Move to Status Register 

Move from Status Register 

Move lo User Stack Pointer 


NEG 


NEG 
NEGX 


Negate 

Negate with Extend 


OR 


OR 

ORI 

ORI to CCR 

ORI to SR 


Logical OR 

OR Immediate 

OR Immediate lo Condition Codes 

OR Immediate to Status Register 


SUB 


SUB 

SUBA 

SUBI 

SUBQ 

SUBX 


Subtract 

Subtract Address 
Subtract Immediate 
Subtract Quick 
Subtract with Extend 



15 14 


13 


12 11 


10 


9 8 


7 


6 


5 


4 3 


2 





MSB 




ByteO 




LSB 


Byte 1 



15 14 


13 


12 


11 


10 


9 8 7 


6 


5 


4 


3 


2 


1 


MSB 










WordO 












LSB 



1 Long Word = 1 Address = 32 Bits 



15 14 13 12 11 10 9 8 7 6 5 4 


3 


2 


1 


MSB 

High Order 

— — Long Word - — 

(address 0) 














Low Order 






LSB 



Notes 







PC 


= Program Counter 


EA 


= Effective Address 





= Contents of 


An 


= Address Register 


d, 


= 8-bit Offset (displacement) 


Dn 


= Data Register 


d„ 


= 16-bit Offset (displacement) 


Xn 


= Address or Data Register 


N 


■ 1 for Byte, 2 for Words and 




used as Index Register 




4 for Long Words 


SR 


= Status Register 


+- 


= Replaces 



Decimal Data 
2 Binary Coded Decimal Digits = 1 Byte 



15 14 13 


12 


11 


10 9 8 


7 


6 5 


4 


3 


2 1 





MSD 

BCDO 


BCD 1 LSD 


BCD 2 


BCD 3 



JMCftO Data Sheet #8 




'Hy ....A New, Authoritative Guide to 
The Most Important Book Ever Published for the Apple. 



at's ihsn In ti APPLE...PIus...the All lew Ouide to liiaf § Whar 



Si 



is William F. Luebbert's Revised Edition of the famous Apple Atlas. The 
original What's Where in the APPLE? provided more information on the 
Apple's memory than was available anywhere else. Now the Revised 
Edition shows you how to use this valuable data. 



'hat's Where In the APPLE..,Pliis.. 

it 8 ~ 



hi All lew fiulde ti What's Where 



• Guides you — with a numerical Atlas and 
an alphabetical Gazetteer — to over 2,000 
memory locations of PEEKs, POKEs, and 
CALLs. 

• Gives names and locations of various 
Monitor, DOS, Integer BASIC, and Apple- 
soft routines — and tells you what they're 
used for. 

• Explains how effectively to use the infor- 
mation contained in the original What's 
Where in the Apple? 

• Enables you to move easily between BASIC 
and Machine Language. 

• Guides you through the inner workings and 
hidden mechanisms of the Apple. 

All Apple users will find this book helpful In understanding 
their machine, and essential for mastering it! 




The Atlas and The ALL NEW GUIDE are available in one, 256-page Wire-O-Bound 

book for only $24.95 



Please send me: 

What's Where in the APPLE...PIus... 
the All New Guide to What's Where 

THE GUIDE 



M9 82 
@ $24.95 

@ $ 9.95 



Add $2.00 surface shipping for each copy, 
Massachusetts residents add 5% sales tax. 

Total Enclosed $ 

D Check □ VISA □ Master Card Acct ft 

E xpires 



Name 



Address 



City State Zip 

MICRO INK 34 Ctnlmsford St., P.O. Bex 6502, Ctnlmsfard, M 01824 



If you own the original What's Where in the 
Apple? you will want THE GUIDE to comple- 
ment your edition. This 128-page, Wire-O-Bound 
version contains all new material to be used 
with the memory map and atlas for $9.95 

Ask for it at your computer store 

Use the Coupon to Order Direct from MICRO 
or 

Call Toll Free Today 1-800-345-8112 
(In PA 1 -800662-2444) 

83-345 
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AARDVARK - THE ADVENTURE PLACE 

ADVENTURES FOR OSI, TRS-80, TRS-80 COLOR, SINCLAIR, PET, VIC-20 



ADVENTURES - Adventures are a unique 
form of computer game. They let you spend 
30 to 70 hours exploring and conquering a 
world you have never seen before. There is 
little or no luck in Adventuring. The rewards 
are for creative thinking, courage, and wise 
gambling — not fast reflexes. 

In Adventuring, the computer speaks and 
listens to plain English. No prior knowledge 
of computers, special controls, or games is re- 
quired so everyone enjoys them— even people 
who do not like computers. 

Except for Quest, itself unique among Ad- 
venture games. Adventures are non-graphic. 
Adventures are more like a novel than a comic 
book or arcade game. It is like reading a par- 
ticular exciting book where you are the main 
character. 

All of the Adventures in this ad are in Basic. 
They are full featured, fully plotted adventures 
that will take a minimum of thirty hours (in 
several sittings) to play. 

Adventuring requires 16k on Sinclair, TRS- 
80, and TRS-80 Color. They require 8k on OSI 
and 13k on VIC-20. Sinclair requires extended 
BASIC. 

TREK ADVENTURE by Bob Retelle - This 
one takes place aboard a familiar starship and 
is a must for trekkies. The problem is a famil- 
iar one — The ship is in a "decaying orbit" 
(the Captain never could learn to park!) and 
the engines are out (You would think that in 
all those years, they would have learned to 
build some that didn't die once a week). Your 
options are to start the engine, save the ship, 
get off the ship, or die. Good Luck. 

Authors note to players — I wrote this one 
with a concordance in hand. It is very accurate 
— and a lot of fun. It was nice to wander 
around the ship instead of watching it on T.V. 

CIRCLE WORLD by Bob Anderson - The 

Alien culture has built a huge world in the 
shape of a ring circling their sun. They left 
behind some strange creatures and a lot of ad- 
vanced technology. Unfortunately, the world 
is headed for destruction and it is your job to 
save it before it plunges into the sun I 

Editors note to players — In keeping with 
the large scale of Circle World, the author 
wrote a very large adventure. It has a lot of 
rooms and a lot of objects in them. It is a very 
convoluted, very complex adventure. One of 
our largest. Not available on OSI. 

HAUNTED HOUSE by Bob Anderson - This 
one is for the kids. The house has ghosts, gob- 
lins, vampires and treasures — and problems 
designed for the 8 to 13 year old. This is a 
real adventure and does require some thinking 
and problem solving — but only for kids. 

Authors note toplayers — This one was fun 
to write. The vocabulary and characters were 
designed for younger players and lots of things 
happen when they give the computer com- 
mands. This one teaches logical thought, map- 
ping skills, and creativity while keeping their 
interest. 



DERELICT by Rodger Olsen and Bob Ander- 
son — For Wealth and Glory, you have to ran- 
sack a thousand year old space ship. You'll 
have to learn to speak their language and 
operate the machinery they left behind. The 
hardest problem of all is to live through it. 

Authors note to players — This adventure 
is the new winner in the "Toughest Adventure 
at Aardvark Sweepstakes". Our most difficult 
problem in writing the adventure was to keep 
it logical and realistic. There are no irrational 
traps and sudden senseless deaths in Derelict. 
This ship was designed to be perfectly safe for 
its' builders. It just happens to be deadly to 
alien invaders like you. 




PYRAMID by Rodger Olsen - This is one of 
our toughest Adventures. Average time 
through the Pyramid is 50 to 70 hours. The 
old boys who built this Pyramid did not mean 
for it to be ransacked by people like you. 

Authors note to players — This is a very 
entertaining and very tough adventure. I left 
clues everywhere but came up with some in- 
genous problems. This one has captivated 
people so much that I get calls daily from as 
far away as New Zealand and France from 
bleary eyed people who are stuck in the 
Pyramid and desperate for more clues. 

QUEST by Bob Retelle and Rodger Olsen - 

THIS IS DIFFERENT FROM ALL THE 
OTHER GAMES OF ADVENTURE!!!! It is 
played on a computer generated map of 
Alesia. You lead a small band of adventurers 
on a mission to conquer the Citadel of Moor- 
lock. You have to build an army and then arm 
and feed them by combat, bargaining, explora- 
tion of ruins and temples, and outright ban- 
ditry. The game takes 2 to 5 hours to play 
and is different each time. The TRS-80 Color 
version has nice visual effects and sound. Not 
available on OSI. This is the most popular 
game we have ever published. 

MARS by Rodger Olsen — Your ship crashed 
on the Red Planet and you have to get home. 
You will have to explore a Martian city, repair 
your ship and deal with possibly hostile aliens 
to get home again. 

Authors note to players — This is highly 
recommended as a first adventure. It is in no 
way simple — playingtime normally runs from 
30 to 50 hours — but it is constructed in a 
more "open" manner to let you try out ad- 
venturing and get used to the game before 
you hit the really tough problems. 



NUCLEAR SUB by Bob Retelle - You start 
at the bottom of the ocean in a wrecked Nu- 
clear Sub. There is literally no way to go but 
up. Save the ship, raise her, or get out of her 
before she blows or start WWI 1 1 . 

Editors note to players — This was actually 
plotted by Rodger Olsen, Bob Retelle, and 
someone you don't know — Three of the nas- 
tiest minds in adventure writing. It is devious, 
wicked, and kills you often. The TRS-80 Color 
version has nice sound and special effects. 

EARTHQUAKE by Bob Anderson and Rodger 
Olsen — A second kids adventure. You are 
trapped in a shopping center during an earth- 
quake. There is a way out, but you need help. 
To save yourself, you have to be a hero and 
save others first. 

Authors note to players — This one feels 
good. Not only is it designed for the younger 
set (see note on Haunted House), but it also 
plays nicely. Instead of killing, you have to 
save lives to win this one. The player must 
help others first if he/she is to survive - I like 
that. 

Please specify system on all orders 




ADVENTURE WRITING/DEATHSHIP by 
Rodger Olsen — This is a data sheet showing 
how we do it. It is about 14 pages of detailed 
instructions how to write your own adven- 
tures. It contains the entire text of Deathship. 
Data sheet - $3.95. NOTE: Owners of OSI, 
TRS-80, TRS-80 Color, and Vic 20 computers 
can also get Deathship on tape for an addi- 
tional $5.00. 

PRICE AND AVAILABILITY : 

All adventures are $14.95 on tape except 
Earthquake and Haunted House which are 
$9.95. Disk versions are available on OSI and 
TRS-80 Color for $2.00 additional. 



ALSO FROM AARDVARK — This is only a partial list of what we carry. We have a lot of other games (particularly for the 
TRS-80 Color and OSI I, business programs, blank tapes and disks and hardware. Send $1 .00 for our complete catalog. 



VQfi 



AARDVARK - 80 

2352 S. Commerce, Walled Lake, Ml 48088 

(313)669-3110 

Phone Orders Accepted 8:00 a.m. to 4:00 p.m. EST. Mon.-Fri. 



^ 



TRS-80 COLOR 



SINCLAIR 



OSI 



VIC-20 
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and Alberta, Canada). 
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address materials directly to: 
MICRO INK, Advertising 
34 Chelmsford Street 
Chelmsford, Massachusetts 01824 
(617)256-5515 
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Andromeda, Inc 68 

Anthro-Digital Software 21 

Apple Tree Electronics 63 

Ark Computing 82, 115, 119 

Aurora Software Associates 84 

CGRS Microtech 19 

C & J Supply 79 

Comp-U-Gamer 101 

CompuTech 77 

Computer Case Co 25 

Computer Data Service 109 

The Computerist, Inc 121 

Computer Mail Order 64-65 

Computer Science Engineering 112 

Computer Systems Associates 104, 105 

Connecticut Information Systems Co 39 

Crow Ridge Associates 25 

Datamost 85, 87, IBC 

Data Transforms, Inc 54 

Decision Systems 112 

Digital Acoustics 26 

D&N Micro Products, Inc 22 

Dr. Dobb's Journal 122 

Eastern House Software 84 

Elcomp Publishing 20 

Excert . . 9 

Execom Corp 37 

Genesis Information Systems Inc 76 

Gimix, Inc. 1 

Hudson Digital Electronics Inc 102 

Interesting Software 18 

Leading Edge. BC 

Logical Devices 120 

Master Manufacturing 66 

MICRObits (Classifieds) 29, 38, 98 

MICRO INK 125, Insert 

Microsoft Consumer Products IPC 

Micro Ware Distributing Inc 44 

Microware Systems Corp. 56 

Modular Mining 77 

Modular Systems 28 

MP Computer Services 70 

Nibble 30 

Olympic Sales Co 70 

PEEK (65) 66 

Perry Peripherals 101 

Personal Computer Products 4 

Quentin Research 31 

RAM/RBC 97 

RC Electronics 62 

Real Soft 50 

Sensible Software 40 

SGC 46 

Skyles Electric Works. . .'.' 10 

Small Systems Engineering. 107 

Smoke Signal Broadcasting 2 

Softel 21, 43 

Softside Publishing . 88 

Southeastern Microsystems 28, 37 

Southwestern Data Systems 6 

Spectrum Systems 70 

Sublogic Communications Corp 13 

Unique Data 81 

Universal Data Research . 66 

Versa Computing, Inc. 55 

Voicetek, Inc. 97 

Wesper Micro Systems 44 

Yankee Peddler. 99 

MICRO INK is not responsible for claims made by its advertisers. 
Any complaint should be submitted directly to the advertiser. 
Please also send written notification to MICRO. 
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October: Education Feature 

• Three Faces of Apple LOGO — An in- 
depth discussion of the three available 
versions of the educational computer, 
LOGO. 

• A Personal Computer System for 
Untrained Users — A look at Applesoft 
BASIC programs that assist untrained 
persons in using an unsupervised computer. 



One Teacher's PET — The author, a fifth 
grade teacher, discusses the growing 
involvement of PET computers in her 
classroom. 

Introduction to Turtle Graphics — This 
article describes the Turtle Graphics 
routines available with Apple Pascal. A 
graphics screen dump is also included. 



Department Highlights 

Data Sheet 

Apple Slices 

PET Vet 

New Publications 

Reviews in Brief 

Software and Hardware Catalogs 



More articles... 

Formatted Output on the Atari 
Apple Pascal P-Code and the 6809 
PET Machine-Language Screen Utilities 
The IBM Selectric as a Printer for the C1P 



20% OFF 



Your money goes farther when you sub- 
scribe. During the course of a year, when you 
subscribe, you save 20% (in the U.S.). 

Pay only $24.00 ($2.00 a copy) for 12 monthly 
issues of MICRO sent directly to your home or 
office in the U.S. 



More MICRO for Less Money 
When You Subscribe 

But on the newsstand — if you can locate the 
issue you want — you pay $30.00 a year ($2.50 
a copy). 

Special Offer — Subscribe for 2 years ($42.00) 
and get 30% off the single issue price. 

Subscribe to MICRO today. 



MICRO 

34 Chelmsford Street 
P.O. Box 6502 
Chelmsford, MA 01824 

Please send me MICRO for 1 year 2 years 

NOTE: Airmail subscriptions accepted for 1 year only. 



Subscription Rates Effective January 1, 1982 



Country 



Rate 



Check enclosed $_ 
Charge my 

No 



VISA account 
Mastercard account 



United States 

Foreign surface mail 

Europe (air) 

Mexico, Central America, Mid East, 

N. & C. Africa 
South Am., S. Afr., Far East, 

Australasia, New Zealand 



$24.00 1 yr. 
42.00 2 yr. 
27.00 
42.00 

48.00 

72.00 



Expiration date 
Name 



* Airmail subscriptions accepted for only 1 year. 
For U.S. and Canadian 2-year rates, multiply by 2. 



Address 



City/State. 



Job Title: 



-Zip 



Type of Business/Industry: . 
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The , „„._.. 

That's an Open Door foIKe Computer Future 



KIDS & THE APPLE is its name, and its game is 
to prepare your child, or any child, to take 
his or her place as a member of the com- 
puter generation by teaching them the 
mysteries of the Apple* computer in ways 
they'll love and enjoy. Don't be surprised if 
you will also learn along with your child. 

The kids of today are fascinated by com- 
puters to start with. And thafs great, be- 
cause it means they're eager to learn. But, 
until this book by Edward H. Carlson, learn- 
ing about the Apple was a fumbling, 
bumbling effort for a child. 

KIDS & THE APPLE was designed in every 
aspect to lead them gently, interestingly 
Vet quickly into the computer world. First, if s 
a large 8 1 /2 by 11 book which can be 
opened flat for ease of use. Second, there 
are 35 chapters, each one building upon 
|he knowledge of the prior chapter - and 
'^ s loaded with dozens and dozens of car- 
toons which make a point as they amuse. 




At computer stores, or from: 

The educational/book division of 

EUDATAMOSI 

9748 Cozycroft Ave. 

Chatsworth, CA 91311 (213)709-1202 



Then, there are special sections for a parent 
or teacher to use so they can work along 
with the kids, if they wish, and help them 
over any rough spots. 

Perhaps the major reasons the kids will love 
this book is that it is truly written so they can 
easily understand it (without a lot of confus- 
ing technical language) . . . and that they 
see on-screen-results almost immediately! 
Right away they realize they'll soon be pro- 
gramming their Apple, making their own 
games! ... or creating other programs for 
school or work or to play. 

The computer world is roaring toward us. To 
be successful at work, school or even play, a 
child will have to be knowledgeable about 
computers. Make sure your favorite child is 
prepared for the challenge. With KIDS & THE 
APPLE at his side, he'll enjoy learning and 
you'll know you've prepared him or her for a 
successful future. Only $19.95. 

'Apple is a trademark of Apple Computer, Inc. 






THE PROWRITER COMETH 




(Audit Cometh On Like Gangbusters.j 

Evolution. 

It's inevitable. An eternal 
verity. 

Just when you think you've 
got it knocked, and you're 
resting on your laurels, some- 
body comes along and makes 
a dinosaur out of you. 

Witness what happened to 
the Centronics printer when 
the Epson MX-80 came along 
in 1981. 

And now, witness what's 
happening to the MX-80 as 
the ProWriter cometh to be 
the foremost printer of the 
decade. 
SPEED 

MX-80: 80 cps, for 46 full lines 
per minute throughput. 
PROWRITER: 120 cps, for 
63 full lines per minute 
throughput. 
GRAPHICS 
MX-80: Block graphics 
standard, fine For things like 
bar graphs. 

PROWRITER: High-resolu- 
tion graphics features, fine 
for bar graphs, smooth curves, 
thin lines, intricate details, etc. 
PRINTING 

MX-80: Dot matrix business 
quality. 

PROWRITER: Dot matrix 
correspondence quality, with 
incremental printing capability 
standard. 
FEED 

MX-80: Tractor feed standard; 
optional friction-feed kit for 
about $75 extra. 
PROWRITER: Both tractor 
and friction feed standard. 
INTERFACE 
MX-80: Parallel interface 
standard; optional serial 
interface for about $75 extra. 
PROWRITER: Parallel and 
serial interface standard. 
WARRANTY 
MX-80: 90 days, from Epson. 
PROWRITER: One full year, 
from Leading Edge. 
PRICE 
Heh. heh. 

Distributed Exclusively by Leading 
Edge Products, Inc., 225 Turnpike 
Street, Canton, Massachusetts 
02021. Call: toll-free 1-800-343-6833; 
or in Massachusetts call collect 
(617)828-8150. Telex 951-624. 

LEADING 
EDGE. 

For a free poster of "Ace " 
IProwriter 's pilot) doing his thing 
please write us. 



